我有个dll，请问如何在自己的程序里加入这个dll

Question

type
  TMyFunc = function: Boolean; stdcall;
var
  vHandle: THandle;
begin
  vHandle := LoadLibrary('MyLib.dll');
  TMyFunc(GetProcAddress(vHandle, 'MyFunc'));
  FreeLibrary(vHandle);
end;

Answer 1

type
  TMyFunc = function(你的参数1：类型1，你的参数2：类型2.....你的参数n：类型n): boolean; stdcall;
var
  vHandle: THandle;
begin
  vHandle := LoadLibrary('MyLib.dll');
   
  TMyFunc(GetProcAddress(vHandle, 'MyFunc'))(你的参数1：类型1，你的参数2：类型2.....你的参数n：类型n);
  FreeLibrary(vHandle);
end;

Answer 2

implementation
function myfunc (x,y:integer;var p:PCHAR):boolean; external 'myfunc.dll'

Answer 3

1.动态实现
type
  TMyFunc = function(你的参数1：类型1，你的参数2：类型2.....你的参数n：类型n): boolean; stdcall;
var
  HD: Hwnd;
begin
  HD := LoadLibrary('dll.dll');
  TMyFunc(GetProcAddress(vHandle, 'MyFunc'));
  TMyFunc(GetProcAddress(vHandle, 'MyFunc'))(你的参数1：类型1，你的参数2：类     2.....你的参数n：类型n);
  FreeLibrary(HD);
2.静态调用
implementation
function myfunc (x,y:integer;var p:PCHAR):boolean; external 'myfunc.dll'