登录窗口退出,报错!

                            
   
  退出按钮写    
  close;  
  application.Terminate;  
   
   
  view   source:  
   
    Application.Initialize;  
      Application.CreateForm(TForm_main,   Form_main);  
      Application.CreateForm(Tdm1,   dm1);  
      Application.CreateForm(TForm_denlu,   Form_denlu);  
      form_denlu.showmodal;  
      if   (okno=   true)   then   begin           //okno   是从确定按钮   中取的  
      Application.Run;  
   
  以前没有问题的,但是这次程序总是在登录退出时报错.请帮我看看.

查看回复

最新教程