●“动态”调用Dll怎么写呀??
Dll我是这样写的-------------
uses
ShareMem,
SysUtils,
Classes,
Dialogs;
{$R *.res}
function ABCC(aaa:string):String;stdcall;
begin
result:=aaa+'***';
end;
exports
ABCC;
begin
end.
请问调用语句怎么写?------------
可否给我说说???
问题点数:20、回复次数:2Top
1 楼xilinpiaoxue001(猪八戒)回复于 2005-03-15 17:16:19 得分 0
用loadlibrary来引导指定DLL文件,用freelibrary来释放DLL文件。
getprocaddress返回指定例程的入口地址。
这是动态的,还有静态的,就是在设计时就引进的,然后调用。Top
2 楼FrozenBird(寒号鸟)回复于 2005-03-15 17:18:27 得分 20
type
TABCC=function(aaa:string):string;stdcall;
var
mw:HWND;
mt:TABCC;
begin
mw:=loadlibrary('你的dll的全名');
if mw<>0 then
try
mt:=GetProcaddress(mw,'ABCC');
if assigned(mt) then
你的变量:=mt('你的参数');
finally
FreeLibrary(mw);
end;
end;
//随手写的,不知道有没有错误。在这个单元和你的调用程序的工程单元首先uses shellmemTop




