首页 下载 移动开发 其他 下载详情 delphi的异常处理 上传:Lockspace 浏览: 25 推荐: 0 文件:ZIP 大小:202.8KB 上传时间:2020-10-06 10:47:02 版权申诉 详细介绍了异常处理的种类,以及代码的详细实现等等,欢迎大家下载 立即下载 上传资源 微信扫一扫 用户评论 提交评论 YoungHao76851 2020-10-06 10:47:02 就下面这么简单的一段,楼主这个分也收得太狠了吧,我还以为有很多异常处理的示范及解说呢 procedureTForm1.Button1Click(Sender:TObject); var aaa:Real; begin try aaa:=StrToInt(Edit1.Text)divStrToInt(Edit2.Text); exceptonEDivByZero do ShowMessage('fuck'); end; ShowMessage(FloatToStr(aaa)); end;
YoungHao76851 2020-10-06 10:47:02
就下面这么简单的一段,楼主这个分也收得太狠了吧,我还以为有很多异常处理的示范及解说呢 procedureTForm1.Button1Click(Sender:TObject); var aaa:Real; begin try aaa:=StrToInt(Edit1.Text)divStrToInt(Edit2.Text); exceptonEDivByZero do ShowMessage('fuck'); end; ShowMessage(FloatToStr(aaa)); end;