Delphi如何接收由VB传过来的RecordSet参数(200分)

  • 主题发起人 主题发起人 zbxx631
  • 开始时间 开始时间
Z

zbxx631

Unregistered / Unconfirmed
GUEST, unregistred user!
各位大侠请教:
1。我的一个通用模块,不知是作成什么样的形式后,能被DELPHI,VB,VC等程序调用。
是OCX,DLL,ACTIVEX LIBRARY还是别的什么。
2。模块要接收一个ADO的RecordSet,能实现吗如何实现。
 
没人回家吗?
 
这样做是比较难和不通用的,目前国际流行的通用DLL/OCX数据接口是这样的:
定义为 OleVariant 不管什么语言都可以了,例如DELPHI是这样用的
var
PhotoData:TMemoryData;
begin
PhotoData:=TMemoryData.Create;
try
Image_data:=VarArrayCreate([0,indexsize-1],VarByte);
DLL的某函数(Image_data);
Pbuf:=VarArrayLock(Image_data);
PhotoData.SetData(pbuf,VarArrayHighBound(Image_data,1)+1);
PhotoData.Save_to_file('c:/temp.dbf');
finally
VarArrayUnlock(Image_data);
PhotoData.DataSize :=0;
end;
end ;
 
后退
顶部