Избавление от системного окна с ошибкой

Главная страница сайта "Delphi Sources"

Раздел "Исходники"

Форум

Избавление от системного окна с ошибкой

Автор: Neil J. Rubenking

У компании Microsoft появилась новая услуга. Они предлагают рекламное место в сообщениях об ошибках программы.

Имеется функция Windows API, преобразующя уродливые Windows-окна, информирующие об ошибках в в привычные исключения Delphi, что, по крайней мере, более эстетично и полезно (поскольку в этом случае ошибка может быть перехвачена и обработана вашей программой).

SetErrorMode(SEM_FAILCRITICALERRORS);

Это все! Эта функция сообщает Windows о том, что вызвавшая ошибку программа будет сама обрабатывать критические ошибки.