怎么总是报错啊？

Question

var
  Form1: TForm1;
  i:integer;
procedure TForm1.Button1Click(Sender: TObject);
begin
i:=1 ;
edit1.Text :=i;
end;
end.
我想把i的值在edit1里显示出来但老是出错，怎样搞的，请高手帮帮忙。

Answer 1

你的I是数值型，而EDIT。TEXT是字符串型，要这样
edit1.text:=inttostr(i);