Delphi ngoại lệ chung bắt

Question

Trong .NET WinForms có một mẹo như vậy mà tôi có thể bắt bất kỳ ngoại lệ uncatched ở cấp ứng dụng.

Cũng có thể thực hiện nó ở Delphi - trong trường hợp nguồn gốc của ngoại lệ không thể bị ràng buộc với khối try/except.

Answer 1

Bạn có thể đính kèm trình xử lý sự kiện vào Application.OnException và xử lý mọi ngoại lệ chưa được xử lý tại đó.

Tùy thuộc vào phiên bản Delphi của bạn, bạn có thể

• đính kèm và thực hiện một eventhandler hoàn toàn bằng mã trong Form Main, DPR của bạn hoặc bất cứ nơi nào bạn thấy phù hợp theo hình thức Application.OnException := DoApplicationException.
• thả một thành phần TApplicationEvents vào biểu mẫu chính của bạn, nhấp đúp vào sự kiện OnException và triển khai mã của bạn.