在 Delphi 中禁用所有运行时错误消息？答案

【问题标题】：Disable all Run time error messages in Delphi?在 Delphi 中禁用所有运行时错误消息？
【发布时间】：2014-10-05 12:58:46
【问题描述】：

当用户运行 exe 时，告诉阻止 Delphi 程序显示任何消息窗口的最标准和最简单的方法是什么？

例如，这是我的带有 Web 浏览器对象的程序，当站点出现错误时 Geko 组件向用户显示错误...我想停止它。

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, OleCtrls, MOZILLACONTROLLib_TLB;

type
  TForm1 = class(TForm)
    MozillaBrowser1: TMozillaBrowser;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses Unit1;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
   MozillaBrowser1.Navigate('http://www.xeex.ir');
end;

end.

【问题讨论】：

这不是 Delphi 问题，而是 Gecko 问题
不，这只是一个示例。我想禁用 delphi 项目中的所有错误...这是我作为示例的确切情况。
Try-Except-End 不可接受？
你问的是一个非常糟糕的主意。它导致程序安静地什么也不做，用户不知道为什么。您可能需要更好地管理这些错误，并提供用户友好的错误消息。但简单地“禁用错误消息”就像把破花瓶扫到地毯下，假装大肿块不存在。

标签： delphi show messages

【解决方案1】：

一般来说，没有办法按照您的要求进行操作。您不能应用将停止显示所有错误对话框的设置。

对于原生 Delphi 异常，您可以根据需要选择忽略它们。这并不是一个好主意。对于第三方代码显示的消息框，您需要该代码提供一种抑制这些错误的方法。如果该机制存在，您当然可以使用它。但是，如果不存在任何机制，那么您就不走运了。每个不同的库都将使用不同的机制。

【讨论】：

非常感谢大卫，所以我必须去问问确切的方法来阻止 Geko 的错误？
这个问题怎么样？您问如何停止所有错误。