W
wxhbox
Unregistered / Unconfirmed
GUEST, unregistred user!
各位大侠,我用MDI主窗口,调用DLL中的MDI子窗口,问题是不报错但是MDI子窗口
一闪而过.请问这是怎么回事!
DLL中代码如下:
procedure Formshow(Handle:THandle;app:Tapplication);
var
p:^LongInt;
begin
p:=@(Application.MainForm);
p^:=LongInt(app.MainForm);
with TForm1.Create(application)do
begin
FormStyle:=fsMDIChild;
Show;
update;
end;
end;
一闪而过.请问这是怎么回事!
DLL中代码如下:
procedure Formshow(Handle:THandle;app:Tapplication);
var
p:^LongInt;
begin
p:=@(Application.MainForm);
p^:=LongInt(app.MainForm);
with TForm1.Create(application)do
begin
FormStyle:=fsMDIChild;
Show;
update;
end;
end;