如何消除主窗口一闪而过得现象:(100分)

  • 主题发起人 主题发起人 sunyb
  • 开始时间 开始时间
我在实际中的办法是一步步判断,将代码藏在条件里,以避免执行。
但是否有其它更好的办法?
 
那你用
Application.Terminate;
exit;

难道不行?
 
Application.Initialize;
Application.CreateForm(TdmMain, dmMain); //数据库连接
if ConnectState then begin //如果连接正常
frmLogin := TfrmLogin.Create(nil);//登陆
if (frmLogin.ShowModal = mrOK) then begin //如果登陆正常
frmLogin.Free;
Application.CreateForm(TfrmMain, frmMain);
Application.Run;
end else begin
frmLogin.Free;
Application.Terminate;
end;
end else
Application.Terminate;

我用一点问题都没有,我认为是比较好的了
 
还是这样最快:TerminateProcess(GetCurrentProcess, 0);
不过可能有内存泄漏隐患:(
 
to mtj:
是不是将读取配置文件、进行数据连接的代码写在数据模块的建立期?
 
对,这样的系统首先是连接数据库,否则什么也干不了,所以建立主窗体要在后一步
 
后退
顶部