如题
解决方案 »
- 请问用ADOTable新增修改时,怎么控制按钮状态?
- 图文混排数据库查询问题?解决立即给分,急!!急
- 急救!!!!怎么列出当前机器内安装的所有MODEM ??
- 在delphi中DBGrid列出了查询出的数据,如何能双击一条记录然后显示出这条记录的详细信息?
- 怎样为DELPHI做的应用软件做一个安装程序?
- 基本的问题:创建一个新类
- 怎样动态改变access表的字段名和字段类型!在线等待!
- 会编网络浏览器的高手请进
- (高分)求代码怎样抹掉窗口句柄
- 120分:寻找rascomp32控件和例程!
- delphi中怎么建ocx控件
- 菜鸟提问:标签控件(Label)的Font属性中字体的高度(Height)负值是什么意思啊?
library Chda;{ Important note about DLL memory management: ShareMem must be the
first unit in your library's USES clause AND your project's (select
Project-View Source) USES clause if your DLL exports any procedures or
functions that pass strings as parameters or function results. This
applies to all strings passed to and from your DLL--even those that
are nested in records and classes. ShareMem is the interface unit to
the BORLNDMM.DLL shared memory manager, which must be deployed along
with your DLL. To avoid using BORLNDMM.DLL, pass string information
using PChar or ShortString parameters. }uses
SysUtils,
Classes,
Forms,
ExtCtrls,
windows,
ADODB,
你自己的工程文件;{$R *.res}Function GetFormOne(aCn:TADOConnection;aApp:TApplication;aModuleName:PChar):TForm; export; stdcall;
begin
FCn:=aCn;
FModuleName:=aModuleName;
Application:=aApp;
Result:=TChdaForm.create(Application);
end;procedure SetOldApplication;stdcall;export;
begin
Application:=FApp;
end;exports
GetFormOne,SetOldApplication;begin
FApp:=Application;
end.FCn可以定义在TChdaForm里面
呵~~,一楼所说的直接传入一个连接组件,也就是使用一个引用指针,把主窗体的连接组件当成参数传给DLL使用,也就是说,通过这个"引用指针",你就是使用的主窗体上的连接组件了.只不过是通过"指针"传入到DLL内部了.