Как отловить ошибку?

Delphi , Синтаксис , Ошибки и Исключения

Как отловить ошибку?

Code:

Try

{здесь вы пишите код в котором может произойти ошибка}

Except

{здесь вы пишите код который выполнится если ошибка произойдёт, если ошибки не будет то этот код не выполняется}

End

Вот как будет выполняться код:

Code:

[Line 1]

Try

[Line 2]

[Line 3]

[Line 4]

Except

[Line 5]

End

[Line 6]

Допустим что [Line x] это строка какого-то Вашего кода. Предположим что при выполнении [Line 3] произошла ошибка, тогда программа будет выполнять строки:

1-2-3(ошибка!)-5-6

Если ошибки нет то будут выполняться следующие линии кода:

1-2-3-4-6

Если надо чтобы ошибка произошла, но перед этим Вы хотите выполнить некие свои действия, то организовать это можно следующим способом:

Code:

Try

{здесь вы пишите код в котором может произойти ошибка}

Except

raise;// вызвать вновь ту же ошибку

End

Автор: Vit (www.delphist.com, www.drkb.ru, www.unihighlighter.com, www.nevzorov.org)

Взято с Vingrad.ru http://forum.vingrad.ru

Статья Как отловить ошибку? раздела Синтаксис Ошибки и Исключения может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

:: 2015-12-03 10:38:01 :: re:Как отловить ошибку?

пользователь: Николай.

Из программы на Delphi вызываю MS Word с заданием распечатать doc файл.
При этом может возникать ошибка принтера(кончилась бумага)
Как это событие отследить?

Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.

:: Главная :: Ошибки и Исключения ::

24.04.2024 15:55:13/0.010762929916382/2