请教Delphi中的异常事件处理Try.Except用法
1个回答
展开全部
例;
try
Age := StrToInt(Edit1.Text);
ShowMessage(Format('生于%d年', [YearOf(Now) - Age]));
except
on EConvertError do
showmessage('输入编辑框的不是一个有效的数字!');
on ERangeError do
showmessage('输入编辑框的年龄值太大!');
end;
其它用法你可以百度菜鸟部落giyu8 然后搜索try
try
Age := StrToInt(Edit1.Text);
ShowMessage(Format('生于%d年', [YearOf(Now) - Age]));
except
on EConvertError do
showmessage('输入编辑框的不是一个有效的数字!');
on ERangeError do
showmessage('输入编辑框的年龄值太大!');
end;
其它用法你可以百度菜鸟部落giyu8 然后搜索try
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
