导航:
论坛 -> DELPHI技术
斑竹:liumazi,sephil
作者:
sik (sik)
★☆☆☆☆
-
普通会员
2003/10/17 13:45:39
标题:
加入我的收藏
楼主:
procedure TMForm.N2Click(Sender: TObject); var f:tform; begin f:=tmainform.Create(application); f.Show; end; --------------------------------------- 如果 子窗体 存在 就激活它 否 再执行如上代码。
----------------------------------------------
-http://www.aipetech.com
作者:
2003/10/17 14:37:52
1楼:
if mainform=nil then begin mainform:=tmainform.Create(application); end; mainform.show;
----------------------------------------------
我们共同努力,一切问题都会解决
作者:
sik (sik)
★☆☆☆☆
-
普通会员
2003/10/18 8:17:07
2楼:
TO:givemeliu 不行还同原来一样,我看有的高手用 if not Assigend(MDIChildForm1) then begin MDIChildForm1:=TMDIChildForm1.Create(Application); //MDIChildForm1是个全局变量 MDIChildForm1.Show; end; 但是提示出错“assigend未定义”
----------------------------------------------
-http://www.aipetech.com
作者:
sik (sik)
★☆☆☆☆
-
普通会员
2003/10/18 17:44:41
3楼:
急!急!有人能解决吗?
----------------------------------------------
-http://www.aipetech.com
作者:
2003/10/19 23:23:12
4楼:
if not Assigned(Form2) then Applicaption.CreateForm(TForm2, Form2); Form2.Show;
----------------------------------------------
-
作者:
sik (sik)
★☆☆☆☆
-
普通会员
2003/10/22 11:56:48
5楼:
谢谢,各位!!已解决!!!
----------------------------------------------
-http://www.aipetech.com