关于Delphi中SysUtils的问题~
下面是我关于编译一个LOGO窗体的程序,其中按照教材走的,可是不知道为什么不对,细细对比了一下是一个地方不对,以下是对的程序:usesForms,SysUtils,Uni...
下面是我关于编译一个LOGO窗体的程序,其中按照教材走的,可是不知道为什么不对,细细对比了一下是一个地方不对,以下是对的程序:
uses
Forms,
SysUtils,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Frm_LOGO};
{$R *.res}
begin
Application.Initialize;
Frm_LOGO := TFrm_LOGO.Create(nil);
Frm_LOGO.Show;
Frm_LOGO.Update;
Sleep(2000);
Frm_LOGO.Close;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
下面是错误的:
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Frm_LOGO};
{$R *.res}
begin
Application.Initialize;
Frm_LOGO := TFrm_LOGO.Create(nil);
Frm_LOGO.Show;
Frm_LOGO.Update;
Sleep(2000);
Frm_LOGO.Close;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
不同就是在
uses
Forms,
SysUtils,//这里,错误的没有这一句,便会出现一个错误说Sleep变
//量没有被声明
Unit1 in 'Unit1.pas' {Form1},
请问这一句是写入的还是操作时自动加入的,如果是自动加入的,该怎么操作???无限感激~!~!~!~! 展开
uses
Forms,
SysUtils,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Frm_LOGO};
{$R *.res}
begin
Application.Initialize;
Frm_LOGO := TFrm_LOGO.Create(nil);
Frm_LOGO.Show;
Frm_LOGO.Update;
Sleep(2000);
Frm_LOGO.Close;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
下面是错误的:
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Frm_LOGO};
{$R *.res}
begin
Application.Initialize;
Frm_LOGO := TFrm_LOGO.Create(nil);
Frm_LOGO.Show;
Frm_LOGO.Update;
Sleep(2000);
Frm_LOGO.Close;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
不同就是在
uses
Forms,
SysUtils,//这里,错误的没有这一句,便会出现一个错误说Sleep变
//量没有被声明
Unit1 in 'Unit1.pas' {Form1},
请问这一句是写入的还是操作时自动加入的,如果是自动加入的,该怎么操作???无限感激~!~!~!~! 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |