两个窗体的问题(20分)

  • 主题发起人 主题发起人 hhnick
  • 开始时间 开始时间
H

hhnick

Unregistered / Unconfirmed
GUEST, unregistred user!
有两个窗体,非父窗体和子窗体,一个窗体创建时,同时创建另一个窗体,而且后创建的窗体必须是shommodal,当然,两个窗体都必须可见。
 
在一个窗体的onshow事件中创建另一个窗体
而且让它showmodal就行了。
 
不行,这样前一个窗体不见了。
 
T1,T2: TFrom;

T1 := TFrom1.Create(self);
T2 := TFrom2.Create(self);
T1.Show;
T1.Update;
T2.ShowModal;
T2.Free;
T2 := nil;
我这里不方便试,你试试先。
 
不对,另外,T1也是showmodal。
 
showmodal时候只能有一个窗体被激活,
你的要求好像不大合理,
你可以试试,以窗体为show
另一个为showmodal
 
可是,当一个窗体是showmodal时,我可以创建另一个窗体,也是showmodal,只不过需要我另外创建;
如:
TForm1.Button1Click(sender : Tobject);
var
Form2 : TForm2;
begin
Form2 := TForm2.create(self);
try
Form2.showmodal;
finally
Form2.free;
end;
end;此时,Form1已经showmodal了。
 
不好意思,应该是TForm,不是TForm2。
 
把form2的创建写在form1的onactive里呢?
 
我原来在Onshow中写的,不行。
 
onshow太早了,窗口还没有显示出来。
 
原来如此,谢了。
 
接受答案了.
 
后退
顶部