Аналог Try Except в Clarion 6.2

[Dark_Stranger]

Добрый день, форумчане!

Интересует такой вопрос:
Есть ли аналог Try Except (Delphi) в Clarion 6.2.

В Delphi можно реализовать такую инструкцию
Try
zero := 0;
number := 1 / zero;

except
ShowMessage('Делить на 0 НИЗЯ');
end;

Есть ли аналог в Clarion 6.2.

[Дед Пахом]

нет

[Dark_Stranger]

нет

Спасибо большое.

P.S.: Очень сильно расстроен...

[kreator]

А вот так не пойдет:

Код: Выделить всё

zero = 0
if zero
  number = 1 / zero
else  
  message('Делить на 0 НИЗЯ')
end 

Или есть какие-то подводные камни?

[Дед Пахом]

дело в том, что обработчик исключений срабатывает на любом операторе в блоке Try, поэтому в Clarion придётся писать if...else вместо каждой строки, потенциально могущей вызвать исключение.