T terry_lzs Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-06 #4 if form1<>nil then showmessage('窗体已生成') else form1:=TForm1.create(Application); form1.show;
H hgood Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-06 #5 if not assigned(form1) then //--create form begin form1:=Tform1.create(application); form1.show; end else exit;
if not assigned(form1) then //--create form begin form1:=Tform1.create(application); form1.show; end else exit;
S structer Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-06 #6 点击时判断,如果已经生成了新的窗口,就不允许再生成新的窗口了。
M MichaelZhu Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-06 #7 用Showmodal,每次只准生成一个窗口.