怎么不显示异常信息? 我想在效验一个输入框只能是整数想在抛出异常时候给予提示并不把异常信息显示出来不知道该怎么做? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 try i := strtoint(edit1.text);except showmessage('error');end; procedure TForm1.Edit1Exit(Sender: TObject);begin try strtoint(Edit1.Text); except ShowMessage('请输入整数类型'); Edit1.SetFocus; end;end; dashi(大师) ,,,你谢谁呀,,, 客户端空闲20分钟后自动断开服务器连接的问题! 求SQL语句 Delphi调用VC的DLL,为什么老是报地址错啊? 能否在程序中判断焦点所在的组件和位置! 问一个我认为比较难的问题,关于RTTI的 winsock中的一些函数问题 我想改变下拉列表框,大家能否给些建议? 有没有详细介绍DELPHI 函数用法的资料 请问有谁知道Delphi提供的Scktsrvr.exe的工作原理吗? 关于应用程序服务器的问题? 怎样将这个符号'&',包括左右边的单引号啊,在程序中赋给label1.caption? 很难的问题......关于DbgridEh几个难点的问题?
i := strtoint(edit1.text);
except
showmessage('error');
end;
begin
try
strtoint(Edit1.Text);
except
ShowMessage('请输入整数类型');
Edit1.SetFocus;
end;
end;