delphi lazarus dll静态调用

//procedure SetHook(dwThreadId: DWORD; pid: DWORD); stdcall; external 'mtf';
//
//procedure StopHook; stdcall; external 'mtf';