我用DLL作共享数据联接模板，怎么调用DLL,其form怎么便用数据联接？
我用DLL作共享数据联接模板，怎么调用DLL,其form怎么便用数据联接？ 问题点数：10、回复次数：3Top
1 楼xbbtzhao（agre）回复于 2006-05-05 10:00:58 得分 0
如何调用使用DLL中的DataModules中的ADO组件Top
2 楼xbbtzhao（agre）回复于 2006-05-05 11:06:54 得分 0
我使用DLL中的DataModules中的ADO组件：
dll文件：uses
SysUtils,
Controls,
Forms,
ActiveX,
windows,
Classes,
DMDLL in 'DMDLL.pas' {DM: TDataModule};//为DataModules，中有ADOConnection组件为ADOConn
{$R *.res}
function showdbdll(hwnd: hwnd): Boolean;
var
f: TDM;
begin
Result := false;
application.Handle := hwnd;
f := TDM.Create(application);
try
//f.Show;
finally
freeandnil(f);
end;
end;
exports
showdbdll;
begin
end.
//////FORM中调用使用DLL中的DataModules中的ADOcon组件 //出错了
implementation
uses DMDLL;
{$R *.dfm}
function showdbdll(hwnd: hwnd): Boolean;far;external 'DBDLL.dll';
procedure TRegCorpForm.FormCreate(Sender: TObject);
begin
ADODataSet.Connection:=dm.ADOCon; //出错在这里
ADODataSet.CommandText:='select * from employeeData';
ADODataSet.Open;
end;
出错提示
http://bbs.2ccc.com/attachments/2006/xbbtzhao_20065511614.jpgTop
3 楼mengfeixue（梦情飞雪）回复于 2006-05-05 14:45:35 得分 0
dll 中 加入以下代码 ：
initialization
CoInitialize(nil);
finalization
CoUnInitialize;
记住要在uses activex;
Top
