delphi – 如何临时禁用“返回值可能未定义”警告？

发布时间：2020-12-15 06:09:43 所属栏目：大数据来源：网络整理

导读：我想在我的代码中禁用特定的警告(W1035),因为我认为编译器对此警告是错误的： function TfrmNagScreen.Run: TOption;begin if ShowModal = mrOk then Result := TOption(rdgAction.EditValue) else Abortend; 没有办法结果不明确,因为Abort抛出EAbort. 我试

我想在我的代码中禁用特定的警告(W1035),因为我认为编译器对此警告是错误的：

function TfrmNagScreen.Run: TOption;
begin
  if ShowModal = mrOk then
    Result := TOption(rdgAction.EditValue)
  else
    Abort
end;

没有办法结果不明确,因为Abort抛出EAbort.

我试过了：

> {$WARN 1035 Off}：显然这仅适用于某些特定错误(参见Documentation)
> {$W-1035}：根本没有

我知道我可以在项目选项中关闭全局警告,或使用{$WARNINGS OFF},但这不是这里的意图.

编辑：我现在QC07这个#89744.

解决方法

您不能全局禁用此警告,但您可以使用{$WARN NO_RETVAL OFF}在本地禁用警告.

{$WARN NO_RETVAL OFF}
function TfrmNagScreen.Run: TOption;
begin
  if ShowModal = mrOk then
    Result := TOption(rdgAction.EditValue)
  else
    Abort
end;
{$WARN NO_RETVAL ON}

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!