Введение в программирование. Pascal и Delphi. Гурьянов Л.В - 126 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

Составители: 

Рубрика: 

125
on <Класс исключения> do <Оператор обработки>;
...
else { обработчик прочих исключительных ситуаций}
<0ператор>
end;
Выполнение оператора начинается с секции try. При отсутствии
исключительных ситуаций только она и выполняется.
Секция
except получает управление в случае возникновения
исключения. После обработки исключительной ситуации управление
обратно в секцию
try не передается; выполняются операторы,
стоящие после
end.
Пример:
var
a, b, c: ShortInt;
begin
try
c:= a div b;
except
on EIntError {Класс исключений для ошибок целочисленной
арифметики (деление на 0, переполнение)}
do
MessageDlg('Ошибка', mtWarning, [mbOK], 0); { вывод
сообщения об ошибке в диалоговое окно с кнопкой OK}
end;
end.
8.1.7.2. Операторы try…finally
Операторы try…finally применяются, когда необходимо возвра-
тить выделенные программе ресурсы даже в случае аварийной ситуа-
ции.
Синтаксис:
try
<Операторы>
finally
<Операторы>;
end; 
        on <Класс исключения> do <Оператор обработки>;
  ...
    else { обработчик прочих исключительных ситуаций}
    <0ператор>
  end;
   Выполнение оператора начинается с секции try. При отсутствии
исключительных ситуаций только она и выполняется.
   Секция except получает управление в случае возникновения
исключения. После обработки исключительной ситуации управление
обратно в секцию try не передается; выполняются операторы,
стоящие после end.
  Пример:
  var
     a, b, c: ShortInt;
  begin
    try
      c:= a div b;
    except
      on EIntError {Класс исключений для ошибок целочисленной
                     арифметики (деление на 0, переполнение)}
      do
        MessageDlg('Ошибка', mtWarning, [mbOK], 0); { вывод
        сообщения об ошибке в диалоговое окно с кнопкой OK}
     end;
  end.
   8.1.7.2. Операторы try…finally
   Операторы try…finally применяются, когда необходимо возвра-
тить выделенные программе ресурсы даже в случае аварийной ситуа-
ции.
  Синтаксис:
  try
  <Операторы>
  finally
  <Операторы>;
  end;


                               125

Страницы