![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Обработка ошибок(исключительных ситуаций) [D6, Win95/98]
sector © (2002-06-28 19:29:00)Может кто нибудь подсказать: я слышал в Delphi существует возможность обработки всех исключительных ситуаций, как реализовать, что бы все исключительные ситуации например обрабатывались messagebox"ом типа "некорректный ввод данных"?
Заранее благодарен.
Volj (2002-06-28 19:44:00) [1]
procedure TForm1.OnCreate(Sender: TObject);
begin
Application.OnException := ExceptProc;
end;
procedure TForm1.ExceptProc( Sender: TObject; E: Exception);
begin
ShowMessage("некорректный ввод данных");
end;