long WINAPI Init(const char *pserver,const char *pUid);
如果动态库里的函数是C语言函数,可以使用 Delphi 的 external 声明。
在 Delphi 中声明该函数:
function Init(pserver: PChar; pUid: PChar): LongInt; stdcall; external 'libraryname.dll';
使用该函数:
var
server, uid: string;
result: LongInt;
begin
server := 'server';
uid := 'uid';
result := Init(PChar(server), PChar(uid));
// 其他代码
end;
请注意,您需要替换 'libraryname.dll' 为该动态库的名称。