delphi7制作DLL文件时如何引用类
我在制作DLL时,需要引用一个类名,具体代码如下:libraryDelphi;usesSysUtils,Classes;kk:Txianxhi;//xianxhi是一个类...
我在制作DLL时,需要引用一个类名,具体代码如下:
library Delphi;
uses
SysUtils,
Classes;
kk:Txianxhi; //xianxhi是一个类名,xianxhi.pas;但在引用时这块老报错;
function TestDll(i:integer):integer;stdcall;
begin
kk.show();//引用函数
Result:=i;
end;
exports
TestDll;
begin
end. 展开
library Delphi;
uses
SysUtils,
Classes;
kk:Txianxhi; //xianxhi是一个类名,xianxhi.pas;但在引用时这块老报错;
function TestDll(i:integer):integer;stdcall;
begin
kk.show();//引用函数
Result:=i;
end;
exports
TestDll;
begin
end. 展开
2个回答
展开全部
瞎猜一下。如果你只是一个函数引用类,麻烦少点,如果你一个DLL多个函数调用一个类,就不好说了。
library Delphi;
uses
SysUtils,
xianxhi, //先要引用这个单元
Classes;
var //定义不能少
kk:Txianxhi; //xianxhi是一个类名,xianxhi.pas;但在引用时这块老报错;
function TestDll(i:integer):integer;stdcall;
begin
kk:=Txianxhi.create; //是类就一定要先创建,再引用,没有你的xianxhi单元,所以不知道创建参数,
kk.show();//引用函数
Result:=i;
KK.free; //创建了就要释放,但释放位置不一定是这
end;
exports
TestDll;
begin
end.
library Delphi;
uses
SysUtils,
xianxhi, //先要引用这个单元
Classes;
var //定义不能少
kk:Txianxhi; //xianxhi是一个类名,xianxhi.pas;但在引用时这块老报错;
function TestDll(i:integer):integer;stdcall;
begin
kk:=Txianxhi.create; //是类就一定要先创建,再引用,没有你的xianxhi单元,所以不知道创建参数,
kk.show();//引用函数
Result:=i;
KK.free; //创建了就要释放,但释放位置不一定是这
end;
exports
TestDll;
begin
end.
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询