UC知道请delphi高手再次帮一下
来源：百度知道 编辑：UC知道 时间：2024/05/25 02:38:13
请高手帮我看看下面这段代码有没有语法错误...
procedure TForm1.Button1Click(Sender: TObject);
var score1:integer;
begin
score1:=StrToInt(LabeledEdit1.Text)
if score1<60 then
Label1.Caption:='对不起,你没有及格'
Else if score1>60 then
Label1.Caption:='恭喜,你及格了'
end;
end.
运行后报错如下
[Fatal Error] Project1.dpr(16): Could not compile used unit 'Unit1.pas'
请问如何解决
procedure TForm1.Button1Click(Sender: TObject);
var score1:integer;
begin
score1:=StrToInt(LabeledEdit1.Text)
if score1<60 then
Label1.Caption:='对不起,你没有及格'
Else if score1>60 then
Label1.Caption:='恭喜,你及格了'
end;
end.
运行后报错如下
[Fatal Error] Project1.dpr(16): Could not compile used unit 'Unit1.pas'
请问如何解决
procedure TForm1.Button1Click(Sender: TObject);
var score1:integer;
begin
score1:=StrToInt(LabeledEdit1.Text);
if score1<60 then
Label1.Caption:='对不起,你没有及格'
Else if score1>60 then
Label1.Caption:='恭喜,你及格了';
end;