1、我想用dll封装一些窗体,问题是这些窗体的数据源不能了。怎么办?
2、本来想把数据源封装dll中调用,可是不知道怎么调用数据源封装后dll。
请各位多多指点。小弟感激不尽。
2、本来想把数据源封装dll中调用,可是不知道怎么调用数据源封装后dll。
请各位多多指点。小弟感激不尽。
解决方案 »
- cxgrid 计数问题请教
- delphi7使用idftp的怪异问题,各位大侠帮忙!!!
- 头一天上班,放分,顺便提个设计模式的问题
- 第三方控件的使用问题————在线等待啊!!!
- 我有好几个问题,请大家帮忙
- 求助DELPHI
- 怎样得到字符串的长度(不是字节数)急急急!!!
- Delphi 6.0 里自带BDE是5.01 而installshield 自带的BDE是5.11,请问是否兼容?我用installshield 6.22做安装程序时为何不能正确安装(已
- delphi语句的写法.....
- 三层结构问题:如何获取用户信息
- 如何看一个exe文件是由何种开发工具开发的?
- 用Delphi打开Excel并导入到Oracle,如何记录这其中发生的错误、成功的记录呀?急啊
http://www.cnblogs.com/dksoft/articles/109862.html
上面有源码,自己看看
那个函数怎么写。给点代码否?
library MyDll;
uses
SysUtils,
Classes,
Forms,
Dialogs, DB, ADODB,
LinkBank in 'LinkBank.pas' {DataForm: TDataModule};{$R *.res}
Function DoTest(H: THandle):TADOConnection;cdecl;
begin
Application.Handle :=H;
with TDataForm.Create(Application) do
begin
Conn.Connected:=true;
DoTest:=Conn.Create(Application);
end;
end;
exports
DoTest;
begin
end.
-----------Form调用DLL--------------
var
MainForm: TMainForm;implementation
{$R *.dfm}
Function DoTest(H: THandle):TADOConnection cdecl; external 'MyDll.dll';
procedure TMainForm.Button1Click(Sender: TObject);
begin
adoquery1.Connection:=DoTest(Application.Handle);
adoquery1.close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from goods');
adoquery1.Open;
end;
-------------------------
单击Button1时出现
[Microsoft][ODBC 驱动程序管理器]未发现数据源名称并且未指定默认驱动程序。
各位帮帮忙解决啊。