Delphi 大家看看这段代码有什么有关问题

Delphi 大家看看这段代码有什么问题啊
procedure TForm1.Button1Click(Sender: TObject);
var
　i:Integer;
begin
　 for i := 0 to 500000 do
　 begin
　　Canvas.TextOut(10, 10, IntToStr(i));
　 end;
end;
end.

报错的原因是 illegal character In inputfile

------解决方案--------------------
　i:Integer; i前面有特殊符号(不是空格也不是制表符); 自己刪掉，其它行一样处理
------解决方案--------------------
就是有非法字符啊，只是肉眼看不见而已，是ASCII码为$A1的字符！！！
下面的把非法字符去掉了！（非法字符位于行首）

Delphi(Pascal) code

var
  i:Integer;
begin
  for i := 0 to 500000 do
  begin
    Canvas.TextOut(10, 10, IntToStr(i));
  end;
end;

Delphi 大家看看这段代码有什么有关问题

相关推荐