如何在DLL中使用DataModule(100分)

  • 主题发起人 主题发起人 LoveBorland
  • 开始时间 开始时间
L

LoveBorland

Unregistered / Unconfirmed
GUEST, unregistred user!
我在DataModule放了许多数据库控件,并定义了许多的基本的数据库计算函数,但现在我想用一个DLL包含它的功能?请问我如何实现?
 
我想这更调用其他窗体是一样的道理吧:
请参考:

DLL 中的Delphi窗体
一、在DLL 中放置窗的的方法
在DLL 中,除了放置标准的函数和过程以外,也可以放置已经做好的的delphi窗体,也可以把做好的窗体供其它程序使用,方法是:

1)首先按普通方法制作窗体,不过在interface区域,对接口函数做如下声明

function Createform(capt:string):string;stdcall;

2)在implementation下加入接口函数

function Createform(capt:string):string;stdcall;
var Form1: TForm1;
begin
form1:=Tform1.Create(application);
form1.show;
form1.caption:=capt;
end;


3)制作DLL 动态连接库,但要声明:

uses
unit1 in 'unit1.pas';

exports

{写入接口标示符}
Createform name 'Myform';

4)调用窗体的程序按普通方法制作,但是 在implementation下首先声明要调用的DLL函数

const
gdi32='myFormdll.dll';
function Createform(capt:string):string;stdcall;external gdi32 name 'Myform';


procedure TForm3.Button1Click(Sender: TObject);
var n,m:string;
begin
m:='我的窗体';
Createform(m);
end;
 
就在dll工程裡直接加入datamodule的單元文件就可以了。就這麼簡單。
假進去容易,調用就麻煩一點了,呵
 
后退
顶部