首先我们先看一下普通Delphi调用动态链接库dll的方法:
{===================静态调用DLL函数===================}
//首先声明这个DLL中的函数,然后就可以直接调用了
function AddNum(Num1,Num2:integer):integer;stdcall;external 'project1.dll' name 'AddNumber';
//function AddNum(Num1,Num2:integer):integer;stdcall;external 'Add_Dll_test.dll' name 'AddNumber';
procedure TForm1.Button1Click(Sender: TObject);
var
Num1,Num2:integer;
Sum:integer;
begin
Num1:=StrToInt(Edit1.Text);
Num2:=StrToInt(Edit2.Text);
Sum:=AddNum(Num1,Num2);
Edit3.Text:=IntToStr(Sum);
end;
{===================动态调用DLL函数===&