请教异常处理的问题
procedure TForm1.Button1Click(Sender: TObject);var
x:integer;
begin
try
x:=strtoint(edit1.Text);
except
showmessage('你输入的不是数字！');
end;
end;
//我的这段处理异常的句子为什么不能处理异常?我在edit1中输入字母A时,怎么程序没有提示"你输入的不是数字！"
var
x:integer;
begin
try
x:=strtoint(edit1.Text);
except
showmessage('你输入的不是数字！');
end;
end;
//我的这段处理异常的句子为什么不能处理异常?我在edit1中输入字母A时,怎么程序没有提示"你输入的不是数字！"
我执行EXE文件就看到我设置的提示了,谢谢各位!