| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

try ... finally

Страницы:   < 1 2 3 >

Анонимщик ©   (2004-07-01 17:41:00) 

Как можно определить:

try

finally
// мы сюда попали нормальным образом или где-то после try было
// сгенерировано исключение?
end

---

Анонимщик   (2004-07-01 18:19:00) [41]

Sandman25
Не подходит. Я пытаюсь избежать локальной раскрутки. Есть AbnormalTermination, но нигде в исходниках дельфи не нашел ее. Даже не знаю, в какой dll она реализована

---

Iconka   (2004-07-01 18:17:00) [42]

Потому что.

---

Ega23   (2004-07-01 18:17:00) [43]

try
try
 ......
except
 ......
end;
finally
.....
end;

---

Анонимщик   (2004-07-01 18:16:00) [44]

Петров Денис
А что?

---

Петров Денис   (2004-07-01 18:12:00) [45]

> Анонимщик ©   (01.07.04 17:41)

Зачем?

---

Sandman25   (2004-07-01 17:41:00) [46]

Normal := False;
try
...
Normal := True;
finally
// мы сюда попали нормальным образом или где-то после try было
// сгенерировано исключение?
if Normal then
...
end

---

Страницы:   < 1 2 3 >

Наверх