主窗体:formMain
动态创建窗体:formCreate主窗体的onCreate事件中 动态创建了formCreate窗体,showmodal方法。我现在关闭整个程序的代码是这样的//formCreate窗体的close事件
formMain.close
运行后,关闭formCreate窗体,FormMain也关闭。
但是有一个闪屏, 就是FormMain现实后,接着被关闭了。我要求是 直接不显示FormMain
动态创建窗体:formCreate主窗体的onCreate事件中 动态创建了formCreate窗体,showmodal方法。我现在关闭整个程序的代码是这样的//formCreate窗体的close事件
formMain.close
运行后,关闭formCreate窗体,FormMain也关闭。
但是有一个闪屏, 就是FormMain现实后,接着被关闭了。我要求是 直接不显示FormMain
解决方案 »
- 封装成dll后的窗体怎么连接到外面的adoconnection
- 我用 adoconnection.open 方法测试数据库连接 如果连接不成功,测试过程中界面就跟假死没反映了?
- 帮忙看看这个类型转换,急啊
- 数据库备份的奇怪问题
- 怎样以十六进制代码打开文件并导出给定地址的值
- 问个很白痴的问题 SQL语句在Delphi中就直接用吗?
- 想覆盖原来的文件除了用rewrite外,用FileCreate可以吗
- 各位大哥,excel倒入导出问题
- 如何对adoquery数据集中的数据进行排序?
- 我想问一个关于邮件槽的问题,大家多帮忙,解决有高分,gz,up均有分,不够再加
- 请问,我在xp中封装的dll在window 2003 能否可以调用
- SOCKET 多线程问题
我用断点看了看,当showmodal 后 formCreate显示, 然后在formCreate点击关闭按钮, 断点回到主程序,并继续向下执行,直到主程序的oncreate事件完毕。所以,效果还是闪了一下
ExitProcess(0);
Application.Terminate;试试看还会闪不?
然后在工程文件里判断
Application.Initialize;
Application.CreateForm(TForm1, Form1);
if continue = 0 then
Application.Terminate
else
Application.Run;
试试直接调用
halt;
with TForm1.Create(Owner) do
begin
ShowModal;
Free;
end;
用完后要Free.