Delphi try abort、exit except 、finally end 执行情况


本文整理自网络,侵删。

 

Delphi try abort、exit except 、finally end 执行情况

 try

    abort;

    Edit1.Text := timetostr(now); //没执行

  except

  //执行了

    ShowMessage('1');

  end;

 

  try

    exit;

    Edit1.Text := timetostr(now); //没执行

  except

  //没执行

    ShowMessage('1');

  end;

 

  try

    exit;

    Edit1.Text := timetostr(now); //没执行

  finally

  //执行了

    ShowMessage('1');

  end;

 

  try

    abort;

    Edit1.Text := timetostr(now); //没执行

  finally

  //执行了

    ShowMessage('1');

  end;

 

 

――――――――――――――――

原文链接:https://blog.csdn.net/ozhy111/article/details/90902987

相关阅读 >>

Delphi strutils.leftstr、strutils.rightstr - 提取左右字符串

Delphi 遍历文件单元文件

Delphi取得桌面工作区域的大小

Delphi 获取打开的记事本中的内容

Delphi 替换指定字符串的函数

Delphi 通过注册表获取系统版本和cpu型号

图解qq群如何快速找到自己想要的Delphi资源

Delphi debug权限提升

Delphi 随机指定范围的字符串函数

Delphi 只用一条语句就能使tbitmap反色

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...