如何在三层中传递自定义Record类型数据的例子 ( 积分: 0 )

  • 主题发起人 主题发起人 xieyunc
  • 开始时间 开始时间
X

xieyunc

Unregistered / Unconfirmed
GUEST, unregistred user!
见网上很多人问过这一问题,但回答者很少。而自已正好在一项目中要用到这一块,于是就写了一个Demo,并传上来,希望对需要者有点用。
截图和源码下载在盒子有。不过是刚上传上去的还未审核,所以我现在还不知道下载地址。
CSDN上已有下载了:http://download.csdn.net/down/162317
效果图在http://xieyunc.blog.163.com/ 上有。
 
盒子下载地址:
http://www.2ccc.com/article.asp?articleid=3990
 
你算定义类型里面可以用OleVariant吗?
好像不可以吧?
 
只要 record 中不存在指针类型的数据, copymemory 就可以了。
 
TSendData = record
chg: Boolean;
Data: OleVariant;
Active: Boolean;
end;

var
MySendData: array of TSendData;
这样的记录类型(MySendData)可以传送吗?
 
OleVariant是一个指针,你传过去后就是指向对方进程的相应地址,但那里肯定没东西,所以会出错.
 
后退
顶部