Delphi报错

陈贱伟

1. procedure TForm1.Button1Click(Sender: TObject);
   
2. var
   
3. i:integer;
   
4. begin
   
5. i:=strtoint(Edit1.Text);
   
6. Label1.Caption:=inttostr(i);
   
7. end;

复制代码

错误提示

小布袋

亲，你这个程序代码没有问题的  只不过你逻辑方面有点问题  你只有在Edit1中输入整数程序就不会出错，你输入字母或其他符合，让程序怎么转成整数呢···ABCddd 怎么转·:loveliness: