Прервать работу основной процедуры - из вызванной процедуры...

← →
HF-Trade © (2005-12-05 03:01) [0]

Есть процедура, из нее вызываю функцию\процедуру(не имеет значения), как из вызванной процедуры\функции прервать выполнение основной?

← →
Profi © (2005-12-05 03:15) [1]

HF-Trade © (05.12.05 3:01)
Вызывай функцию возвращающею Boolean.

If MyFunction(...) then // function MyFunction(...):boolean;
...
else
exit;

← →
Джо © (2005-12-05 03:20) [2]

Возбудить в ней исключение, а в вызывающем коде его не перехватывать.

← →
HF-Trade © (2005-12-05 03:22) [3]

А есть способ прервать все процедуры\функции?

← →
Profi © (2005-12-05 03:23) [4]

Джо © (05.12.05 3:20) [2]
Как-то это слишком уж жестоко.

← →
Profi © (2005-12-05 03:23) [5]

HF-Trade © (05.12.05 3:22) [3]
Halt.

> [4] Profi © (05.12.05 03:23)
> Джо © (05.12.05 3:20) [2]
> Как-то это слишком уж жестоко.

Почему жестоко? Именно для этого исключения и были придуманы - для передачи управления назад по стеку вызовов до первого обработчика.

> Profi © (05.12.05 03:23) [4]
> Джо © (05.12.05 3:20) [2]
> Как-то это слишком уж жестоко.

Для этого исключение Abort сделали

Прервать работу основной процедуры - из вызванной процедуры... Найти похожие ветки