如何通过代码调用Dll?
谢谢!!!
谢谢!!!
解决方案 »
- SQL语句出错,咋会事..........
- 怎样在事件中取得对象的name属性?急
- 谁用过delphi7里的TDatatbl控件阿?
- 一个超难的问题,我已问过“无数高手”,这里是最后的希望了,如何获得“C:\Documents and Settings\Administrator\Local Settings\Tempo
- dbgrided中的DrawcolumnCell事件。如何将组别中带组字的那一行字体变为红色?(下图)
- DbGrid自动换行
- 求助,如何在DELPHI中调用windows操作系统的计算器!(给分50)
- delphi提示这个错误,是什么意思,急?
- delphi7好像多了很多东西,也少了不少东西
- word2000文档的密码忘记了,怎么办,有解密软件吗?
- 我用OPENdialog打开文件后,当前目录变成了这个打开文件的目录,不是我的程序的目录了,
- 程序连接服务器出现的奇怪问题
GetProcAddress找Google去的
type
TFunctionName = function(str: String):Integer;stdcall;procedure TFrom1.BtnClick(Sender: TObject);
var
HH:THandle;
begin
try
HH:=LoadLibrary('xx.dll');
if HH<>0 then
begin
@FunctionName:=GetProcAddress(HH,pchar('FunctionName'));
if @FunctionName<>nil then
begin
//调用
end;
end;
finally
FreeLibrary(HH);
end;
end;