VFP中使用winsock控件收发网络数据时,如果包含有二进制数据,总是会丢失,或者与实际数据不符,这是由于字符转换的问题引起的。
vfp的字符串本质与二进制数据没有任何区别,而所有的OCX控件和COM组件(OCX控件本质是一种有界面的COM),默认都是UNICODE字符传输,虽然COM定义了几十种数据类型,但在VFP中,基本就只数字和字符可以用了,所以VFP在与组件交换数据时,会自动进行ansi->unicode或者unicode->ansi转换,大于128的字符如果成对则不易转错,但不成对出现时,这种转换就失败了,导致数据不是原始的数据,为了避免VFP的自动转换,可按如下方式处理:
1.从VFP传给组件
只需要简单套个CreateBinary(),VFP在把字符串传给组件时,不做任何转换,相当于BYTE或者LPBYTE,比如在winsock中发送二进制数据时,可以这样:
this.SendData(CreateBinary(你的字符串))
2.从组件到VFP
这种情况比较复杂,可以使用的数组做为COM字节数组传递,比如在winsock中接收二进制数据,需要按如下方式处理:
DataArrival事件中:
LPARAMETERS bytestotal
ComArray(this.object,11)
Dimension lcBuffer[1] as Byte
this.object.GetData(@lcBuffer,17,bytesTotal)
?lcBuffer
?Strconv(lcBuffer,15)
这样获取到的数据就是原始的二进进制数据,不会被VFP转换。
在使用其他ocx控件或者com组件时,如果遇到需要处理二进制数据,均可按此方法,稍加修改即可。
————————————————
版权声明:本文为CSDN博主「ljyit」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.