| | | |

2019年11月21日

摘要：服务端直接将TADOQuery查询出来的数据直接转换成TStream自己进行传递，到客户端用一个TADOQuery对象还原流就可以了。方法一是将recordset保存成流接口->转成OleVariant ->写入流 class function TADOTools.saveToStream2( 阅读全文

posted @ 2019-11-21 16:12 zyb2016 阅读(259) 评论(0) 推荐(0)

服务端OLEVARIANT数据之后传输

摘要：将OLEVARIANT数据流化，然后对流进行压缩，还原成OLEVARIANT以后再发送。 procedure StreamToVariant(Stream: TStream; var V: OLEVariant);var P : Pointer;begin try V := VarArrayCrea 阅读全文

posted @ 2019-11-21 16:07 zyb2016 阅读(153) 评论(0) 推荐(0)