Форум: "Основная";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];

Вниз

Exception   Найти похожие ветки 

← →
Serhy   (2002-05-15 02:18) [0]

Возможно ли, и если да, то как обработать Exception, сразу во всем приложении? Обработать не в смысле - написать свое сообщение, а в смысле "игнорировать" exception?

---

← →
BAHO   (2002-05-15 03:02) [1]


Procedure TMyForm.Activate(Sender: TObject);
begin
Application.OnException:=AppException;
end;
Процедуру AppException надо определить в классе TMyForm
Procedure AppException(Sender: TObject; E: Exception);
Затем описываем в части реализации
Procedure AppException(Sender: TObject; E: Exception);
begin
// Твой код
end;

E - Код ошибки...

---

← →
BAHO   (2002-05-15 03:05) [2]

Ошибочка вышла в части реализации:

Procedure TMyform. AppException(Sender: TObject; E: Exception);
begin
// Твой код
end;


---

← →
Serhy   (2002-05-15 03:12) [3]

Еще раз повторю.
"Обработать", не в смысле - написать свое сообщение об ощибке, а в смысле игнорировать exception!

---

← →
BAHO   (2002-05-15 04:05) [4]

Если своего кода не вставиш то сообщения будут игнорироваться !

---

← →
S@shka   (2002-05-15 14:04) [5]

Игнорировать Exception это интересно :)
В принципе можно, можно отключить обработку исключений Дельфи в процессе создания программы в Tool/Debuger вроде бы (если не ошибся)
Но зачемвпринципе отказываться непонятно???
Можно всю прогу поместить в блоки
try
....
......
except on E:Exception
в файле проекта.....

---

← →
eSKey   (2002-05-15 16:01) [6]

Возможно под "игнорировать" подразумевается переходить к операции, следующей за вызвавшей эксепшн, так, как будто ошибки не было? Ибо в предложенных решениях происходит вылет из текущей процедуры, как я понимаю...
Т.е. наподобие конструкции Vis. Basic "on error resume next".
Уточните, автор, вам это надо?

---

← →
Tonie   (2002-05-15 17:43) [7]

Игнорировать это плохо, невежливо ... говорят, мол лажа где-то, ситуация понимаааш исключительная ....
Но если непременно игнорировать надо то Exception Handler ставищь как BAHO © написал а в нем можешь например только свое исключение пропустить так


Procedure AppException(Sender: TObject; E: Exception);
begin
...
if E is EMySilent then // Если это мое исключение
else
Application.ShowException(E);
....


---

← →
Serhy   (2002-05-15 19:18) [8]

2 eSKey (15.05.02 16:01)
Когда задавал вопрос, именно это и было нужно. После понял, что не прав. Наверно действительно OnException подойдет. Буду экспериментировать.

2 S@shka (15.05.02 14:04)

>Игнорировать Exception это интересно :)
>Можно всю прогу поместить в блоки
>try
>....
>......
>except on E:Exception
>в файле проекта.....
Не интересно как раз как всю прогу поместить в try except в файле проекта, что бы она при этом не вылетала? :)

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.005 c