procedure TForm1.Button1Click(Sender: TObject);
var
  i:integer
begin
  i:=StrToInt(edit1.text);
  i:=i+1;
end;

解决方案 »

  1.   

    正确的写法
    procedure TForm1.Button1Click(Sender: TObject);
    var
    i:integer;//每句话后面加分号
    begin
    i:=strtoint(edit1.text)//:=  与  =不同
    i:=i+1;
    end;
      

  2.   

    你的目的是要EDIT里边不停的加1?那么:
    procedure TForm1.Button1Click(Sender: TObject);
    var
      i:integer
    begin
      i:=strtoint(edit1.text);
      i:=i+1;
      edit1.text:=InttoStr(i);
    end;
      

  3.   

    i=strtoint(edit1.text)  should be :     i:=strtoint(edit1.text);
      

  4.   

    是不是别的地方要加点东西
    系统提示i=strtoint(edit1.text) ;这句话有错误
      

  5.   

    正确的写法
    procedure TForm1.Button1Click(Sender: TObject);
    var
    i:integer;//不必每句话后面加分号;分号的功能是将各条语句分割,有关键字的地方分号可以不加,当然加了分号也不会错。
    begin
    i:=strtoint(edit1.text)//:=  与  =不同
    i:=i+1//(可以不加分号)
    end;//:=  与  =不同
      

  6.   

    i:=strtoint(edit1.text);//:=  与  =不同