Undeclared identifier: AbnormalTermination

← →
AGGRESSOR © (2003-10-02 12:13) [0]

Приветствую! Вот код:

uses ShellAPI;
...
try
...
finally
if AbnormalTermination then ...
end;

А ошибка в сабже. Никогда не пользовался встраиваемыми функциями. Подскажите, что не так.

← →
N169 (2003-10-02 12:40) [1]

А чё такое AbnormalTermination?

← →
AGGRESSOR © (2003-10-02 13:02) [2]

Win 32 programmer"s reference:
The AbnormalTermination function indicates whether the try block of a try-finally statement terminated normally. The function can be called only from within the finally block of a try-finally statement.

← →
Игорь Шевченко © (2003-10-02 13:42) [3]

Блин. Ну когда люди читать научатся...

The AbnormalTermination function indicates whether the __try block of a termination handler terminated normally. The function can be called only from within the __finally block of a termination handler.

Note The Microsoft C/C++ Optimizing Compiler interprets this function as a keyword, and its use outside the appropriate exception-handling syntax generates a compiler error.

BOOL AbnormalTermination(void);

Parameters
This macro has no parameters.

Цитата из excpt.h

#define AbnormalTermination _abnormal_termination
int __cdecl _abnormal_termination(void);

С какой, блин, радости, Дельфи должна что-то знать о сишных библиотеках времени выполнения ?

← →
Digitman © (2003-10-02 13:52) [4]

в принципе, конечно, можно и задействовать msvcrt, но тогда try, finally, except, raise и пр. придется "похоронить" (включая отказ от большей половины VCL)

во как !) ... для мазохистов - замечательный способ получить сатисфакцию)))

так вот думаю я себе)

← →
AGGRESSOR © (2003-10-02 17:35) [5]

2 Игорь Шевченко:
Ну ЛЕНЬ мне было читать все до конца! Нашел функцию, прочитал первый абзац- и готово :) Виноват, исправлюсь.

2 Digitman:
Мои друзья-мазохисты будут в восторге! :) А для более традиционных людей найдется способ узнать, как завершен блок try? Мне Гугль показал, что такой вопрос уже был в этом форуме, только вот страничка похоронилась пару месяцев (лет?) назад.

try

except

end;

> AGGRESSOR

что ж.. коль Борланд не сподобился предоставить аналогичный механизм в ObjectPascal, придется самому лезть в TLS и анализировать стек раскрутки

Undeclared identifier: AbnormalTermination Найти похожие ветки