中国教程网论坛 » Delphi » 点运行弹出个application错误提示..

知猪侠 发表于 2007-12-27 10:38

点运行弹出个application错误提示..

编绎没发现有语法错误..但我一点运行就会弹出一个错误提示,..如图.
代码如下:
program   Project2;

uses
    QForms,
    Unit1   in   'Unit1.pas'   {main},
    Unit2   in   'Unit2.pas'   {login};

{$R   *.res}
begin
    Application.Initialize;
              Application.Title   :=   'B5317播放器';
        Login:=Login.Create(Application);
    Login.Timer.Enabled   :=   True;
    Login.Show;
        while   Login.Login_Off   =   False   do
                Application.ProcessMessages;
                Login.Hide;
                Login.Free;
      
      Application.CreateForm(Tlogin,   login);
    Application.Run;
end.
这是我的代码.请问这是怎么回事?

xcj_roger 发表于 2008-7-18 21:44

真的 太好 了学习了

查看完整版本: 点运行弹出个application错误提示..