SoftHub关联区 - [delphi]老代码维护 -- 重新将异常抛出不是 raise e; 而是 raise; 就行了，不要带参数

您的位置：首页 >> SoftHub关联区 >> 主题: [delphi]老代码维护 -- 重新将异常抛出不是 raise e; 而是 raise; 就行了，不要带参数 [回主站] [分站链接]

您的位置：首页 >> SoftHub关联区 >> 主题: [delphi]老代码维护 -- 重新将异常抛出不是 raise e; 而是 raise; 就行了，不要带参数 [最新] [回主站]

[delphi]老代码维护 -- 重新将异常抛出不是 raise e; 而是 raise; 就行了，不要带参数

clq

浏览(552) - 2019-12-27 16:44:18 发表编辑

关键字: delphi

[delphi]老代码维护 -- 重新将异常抛出不是 raise e; 而是 raise; 就行了，不要带参数

//raise e;
raise; //异常再次抛出不要带参数，据说这叫继承

procedure TFrm_t.Execute_OracleSql(SQLInStr:string);
begin
//Result := False;
try
with DM1.ADO_oracle do
begin
Close;
SQL.Text := SQLInStr;
ExecSQL;
end; //with
except
on e:Exception do
begin
// if e.Message = 'Error while trying to retrieve text for error ORA-03113' then
// begin
// //if ReCon_ then
// // Continue;
//
// Result := True;
// ReCon_; //重连 oracle
// end;

//--------------------------------------------------------

//raise e;
raise; //异常再次抛出不要带参数，据说这叫继承
end;

end;
end;

总数：0　页次：1/0　首页尾页　　

所在合集/目录

delphi易错更多

发表评论:

本帖子属于以下条目(delphi)

delphi收集目录

Delphi 10.3 Community Edition[免费社区版]

NEWBT官方QQ群1: 276678893
可求档连环画,漫画;询问文本处理大师等软件使用技巧;求档softhub软件下载及使用技巧.
但不可"开车",严禁国家敏感话题,不可求档涉及版权的文档软件.
验证问题说明申请入群原因即可.