delphi - 如何避免显示错误？

Question

如何避免显示 Windows 小错误框？
Try和Except不起作用，因为错误不是由 Delphi 显示的，而是来自程序或我认为来自 Windows。

try<br/>
Size:=TFileStream.Create(BitFile,fmOpenRead);<br/>
except on E: EFCreateError<br/>
do EC.Add('Error: ' + IntToStr(GetLastError));<br/>
end;

Answer 1

您的应用程序中是否显示错误？否则，这是一个未处理的异常吗？或者它是由 Windows 或外部应用程序显示的框？

你说的是“事件”，但事件处理程序也可以包含 try.. except block 。

如果它是一个异常，并且您不知道它来自哪里，则可以使用 TApplicationEvents 类附加 Application.OnException 事件。它将触发所有未处理的异常。您可以在那里捕获它，或者更确切地说，设置一个断点并使用堆栈跟踪来查看异常来自何处。