H hhnick Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-25 #1 有两个窗体,非父窗体和子窗体,一个窗体创建时,同时创建另一个窗体,而且后创建的窗体必须是shommodal,当然,两个窗体都必须可见。
B book523 Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-25 #2 在一个窗体的onshow事件中创建另一个窗体 而且让它showmodal就行了。
P panjf Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-25 #4 T1,T2: TFrom; T1 := TFrom1.Create(self); T2 := TFrom2.Create(self); T1.Show; T1.Update; T2.ShowModal; T2.Free; T2 := nil; 我这里不方便试,你试试先。
T1,T2: TFrom; T1 := TFrom1.Create(self); T2 := TFrom2.Create(self); T1.Show; T1.Update; T2.ShowModal; T2.Free; T2 := nil; 我这里不方便试,你试试先。
F frenking Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-25 #6 showmodal时候只能有一个窗体被激活, 你的要求好像不大合理, 你可以试试,以窗体为show 另一个为showmodal
H hhnick Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-25 #7 可是,当一个窗体是showmodal时,我可以创建另一个窗体,也是showmodal,只不过需要我另外创建; 如: TForm1.Button1Click(sender : Tobject); var Form2 : TForm2; begin Form2 := TForm2.create(self); try Form2.showmodal; finally Form2.free; end; end;此时,Form1已经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了。
P panjf Unregistered / Unconfirmed GUEST, unregistred user! 2003-11-25 #9 把form2的创建写在form1的onactive里呢?