var
dll:Cardinal;
pp:function(x,y:integer):integer;
begin
dll:=LoadLibrary(PChar('xx.dll'));
if dll<>0 then
begin
@pp:=GetProcAddress(dll, 'abc');
if @pp<>nil then
begin
//调用函数
end;
FreeLibrary(dll);
end;
end;
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024