15,471
社区成员
发帖
与我相关
我的任务
分享
hDll=LoadLibraryW(LPCWSTR("Smart.DLL"));
typedef int (WINAPI* FUNC)(char* str1, char* str2);
FUNC lpFunc = (FUNC)GetProcAddress(hDll,"ShowForm");
lpFunc("hunter","xing");
procedure ShowForm(DoctorName,UserName:PChar);
begin
sDoctorName:=DoctorName;
sUserName:=UserName;
end;
exports
ShowForm;
typedef void( *type )( const char*, const char* );
lpFunc;
lpFunc = GetProcAddress( hDll, "ShowForm" );
( *lpFunc )( "hunter", "xing" );