我定义了2个form form1,form2[form2上有个关闭按钮] form1为主窗体
在form1的on show事件中我创建代码 Application.createform(tform2,form2); form2.showmodal;form2.free;
运行程序 当触发form1的onshow事件后,form2的却能创建出来,但我本想实现在form2上如果按关闭按钮后,就直接关闭了 不再创建form1了,但现在的问题是不管怎么样写代码 当form1触发onshow事件后,即使按了form2上的关闭按钮了form1仍然创建?
请问改如何解决?
ps:除了了使用Application.Terminate方法 因为我在form1是上还有个main;
在form1的on show事件中我创建代码 Application.createform(tform2,form2); form2.showmodal;form2.free;
运行程序 当触发form1的onshow事件后,form2的却能创建出来,但我本想实现在form2上如果按关闭按钮后,就直接关闭了 不再创建form1了,但现在的问题是不管怎么样写代码 当form1触发onshow事件后,即使按了form2上的关闭按钮了form1仍然创建?
请问改如何解决?
ps:除了了使用Application.Terminate方法 因为我在form1是上还有个main;
解决方案 »
- 窗体要打开两次才能正确显示代码,这是为什么呀?
- 请看为什么不能在RichEdit中隔行显示两个字符串?
- 大家帮忙研究一下,如何将日志钩子记录下的动作全部保存到文件中,程序下次运行时打开此文件仍然可以重放上一次录制的东西?分不够再加
- 怎样通过虚拟路径找绝对路径
- 请大家来讨论一下:关于程序控制的问题
- 给正确答案者,给高分
- 帮我看看这代码哪 儿错了,运行不了
- ***请教高手,用DCOM怎么在客户端向服务器指定的目录发送文件?***
- 什么情况下应该使用线程? 新手总是会使用一些"画蛇添足"的东西~
- 寻找icandoit.
- 如何改变image中图片的颜色呢???
- delphi中怎样实现象powerpoint中的箭头效果?
Form1是主窗口,实际上on show时整个应用程序(包括了主窗口Form1本身)已经创建了。因此,无论在form2上执行什么事件都不影响Form1的产生。
如果是不想显示Form1的话可用用:Form1.hide 将主窗口隐藏
form2关闭时写
Application.Terminate;
在form2的onclose里写:
Action:=cafree;
form2:=nil;
form1.close;