перехват сообщения об ошибке

← →
_MAD_ © (2003-04-07 21:20) [0]

помогите мне пожалуйста
я написал программу но она почемуто посноянно выдает ошибку так вот мне надо перехватить и убить эту ошибку до того как пользователь ее увидет.
напишите пожулуйста ответ и по возможности с примером.

← →
Morfein © (2003-04-07 21:23) [1]

Ну ты молодец... ты бы хоть примерно намекнул, в какой области ошибка и что за программа... в windows"е разных ошибок тысячи...

← →
DVM © (2003-04-07 21:25) [2]

try
...действия приводящие к ошибке...
except
...действия в случае ошибки...
end.

это для всех ошибок(исключений), а их можно еще разделять.

← →
Иван Шихалев © (2003-04-07 22:05) [3]

Лучше всего убить ошибку до того, как программа запущена - еще в исходном коде. Если, конечно, она не в ДНК :)

← →
Morfein © (2003-04-07 22:36) [4]

>> DVM
try-exсept это далеко не для любого случая!

← →
DVM © (2003-04-07 22:39) [5]

Ясное дело.

>> DVM
Я просто ошибся, не дочитал до "... а их можно еще разделять."(исключения). Я подумал, что ты гришь про то, что try-except ловит все ошибки... :)

ну ладно попробую объяснить что за ошибки ну например из-за не правильной работы одного компонента в программе то на определкнном этапе выполенния возникает ошибка но программа не перестает работать просто надоедливое окошко ошибки мазолить глаза так вот мне требуется от него избавиться

In addition to displaying the exception message, which happens by default, the following code shuts down the application when a VCL exception is not caught and handled.

procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnException := AppException;

end;

procedure TForm1.AppException(Sender: TObject; E: Exception);

begin
Application.ShowException(E);
Application.Terminate;
end;

перехват сообщения об ошибке Найти похожие ветки