Delphi - база знаний


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


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



Try

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

Вот как будет выполнятся код:
[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


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

Try
  {здесь вы пишите код в котором может произойти ошибка}
Except
  {здесь вы пишите код который выполнится если ошибка произойдёт, если ошибки не будет то этот код не выполняется}
  raise;// вызвать вновь ту же ошибку
End

Автор Vit



Начало  Назад  Вперед