我现在在做一个程序 多个窗体

我现在设置的是FROM2为主窗体 在运行的时候先运行FORM1窗体 然后验证通过后进入FROM2主窗体隐藏FROM1窗体

问题
1、现在关闭FORM2S时候 FROM1没关闭 使用FROM1.CLOSE关闭不好使
2、关闭FROM1时候 程序也是没关闭完

我该设置FORM1窗体为主那 还是设置FROM2为主窗体

我在运行时候 先创建
begin
Application.Initialize;
Application.CreateForm(Tzct, zct);//ZCT主窗体
Application.Run;
end.

在主窗体开始时候创建登陆窗体
procedure Tzct.FormCreate(Sender: TObject);
begin
zct.Visible:=false;
dl:=Tdl.Create(application);
dl.Visible:=false;
dl.ShowModal;
end;
主窗体关闭事件过程代码
procedure Tzct.FormClose(Sender: TObject; var Action: TCloseAction);
begin
dl.Close;
action:=cafree;
end;
登陆窗体关闭过程代码
procedure Tdl.FormClose(Sender: TObject; var Action: TCloseAction);
begin
dl.Close;
zct.Close;
end;

恩可以拉
感谢sky_yang_sky

又是你啊
能加我QQ吗
312665314

以后好向你请教问题嘿嘿

[此贴子已经被作者于2007-10-12 19:29:08编辑过]

为什么不用showmodal窗体呢，这个效果比较的好
不过具体问题具体对待，有时候孩子窗体还是必须的。

多謝你的西瓜，那個真的是我的最愛︿ˍ︿，