TFatalErrorEvent = procedure (Sender: TObject; const Msg: String; var Accept: Boolean)
Событие, возникающее при неожиданной ошибке.
Параметры:
Ссылки: TMainFm.OnFatalError