DLL中显示模式窗体
要把一个Form编译进DLL,这个Form必须要自己创建和释放。
由于源代码分为几个部分,这里写下dll的关键代码:
function showform(handle1:THandle):Boolean;stdcall;
var
form3:TForm1;
begin
Result:=True;
form3:=TForm1.Create(nil);
Application.Handle:=handle1;
try
form3.ShowModal;
finally
form3.Free;
end;
end;
------------------------------------------------------
源代码下载:http://www.rayfile.com/files/01bda78c-1af1-11df-a58d-0015c55db73d/