delphi动态联接库中使用Application.Handle := App;App是调用DLL的主程序传给DLL中函数的句柄,在VC++中调用DLL时怎么获得这个句柄值?procedure ShowForm(App:THandle);stdcall; //
var
Filename:string;
s1,s2:string;
v:integer;
myinifile:Tinifile;
begin
Application.Handle := App;
try
frmDLL := TfrmDLL.Create(Application);
frmDLL.ShowModal;
except
on E: Exception do
MessageDlg('Error in DLLForm: '+E.Message, mtError, [mbOK], 0);
end;
end;
var
Filename:string;
s1,s2:string;
v:integer;
myinifile:Tinifile;
begin
Application.Handle := App;
try
frmDLL := TfrmDLL.Create(Application);
frmDLL.ShowModal;
except
on E: Exception do
MessageDlg('Error in DLLForm: '+E.Message, mtError, [mbOK], 0);
end;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货