Question

求助：关于调用DLL中窗体的问题

Answer 1

hd_csqm:=LoadLibrary('evcrypt.dll'); try if hd_csqm<>0 then begin crt_sqm:=GetProcAddress(hd_csqm,'EncryptString'); showmessage(crt_sqm('123456','123456787909')); end else showmessage('找不到函数'); finally FreeLibrary(hd_csqm); end;