小编Rus*_*sta的帖子

Delphi错误处理:尝试提升vs退出...除...结束

尝试呼叫退出是否安全?或者我应该拨打加薪

我尝试了下面的两个示例,并在举例中,跟踪通过Delphi的内部库代码.退出时只退出程序,仅此而已.

我读到最好保留应用程序堆栈或队列或类似的东西.调用exit会打破那个堆栈吗?

例1(加注)

SDDatabase1.StartTransaction;
Try
  SDQuery1.ApplyUpdates;
  SDDatabase1.Commit;
  SDQuery1.CommitUpdates;
Except
  SDDatabase1.Rollback;
  SDQuery1.RollbackUpdates;
  raise;
End;
..............//other codes I don't want to execute
Run Code Online (Sandbox Code Playgroud)

例2(退出)

SDDatabase1.StartTransaction;
Try
  SDQuery1.ApplyUpdates;
  SDDatabase1.Commit;
  SDQuery1.CommitUpdates;
Except
  SDDatabase1.Rollback;
  SDQuery1.RollbackUpdates;
  MessageDlg('Save Failed because: '+E.Message, mtError, [mbOK], 0);
  exit;
end;
..............//other codes I don't want to execute
Run Code Online (Sandbox Code Playgroud)

delphi delphi-10.1-berlin

2
推荐指数
2
解决办法
2867
查看次数

标签 统计

delphi ×1

delphi-10.1-berlin ×1