Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.09.09;
Скачать: CL | DM;

Вниз

Вопрос по Exception в TThread-е   Найти похожие ветки 

 
alles ©   (2007-08-16 11:41) [0]

Добрый день.
Есть один поток который запускается из основного потока. В нем идет какая-та проверка и если она не выполняется, поток генерирует Exception. Примерно так:

if not Assigned(NetShareEnumNT)
                    raise Exception.Create("NetShareEnumNT not assigned");                


как правильно передать этот Exception основному потоку и там показать окошку с Exception и завершить этот поток?
Спасибо


 
Сергей М. ©   (2007-08-16 12:12) [1]

оч просто.

Для этого класс TThread предоставляет публичный метод FatalException.

Им можно воспользоваться, например, так:

Основной поток после создания доолнительного потока в suspended-режиме устанавливает обработчик OnTerminate, в котором анализируется состояние этого св-ва. Если оно не равно nil, то в ходе работы доп.потока было зафиксировано необработанное тобой исключение, которое можно проанализировать (но не позднее вызова деструктора доп.потока) и при необходимости перевозбудить его вызовом raise FatalException


 
Сергей М. ©   (2007-08-16 12:14) [2]

Но лучше всего не допускать ситуаций с необработанными исключениями в потоке, оборачивая тело метода Execute в блок try..except


 
Leonid Troyanovsky ©   (2007-08-16 12:27) [3]


> alles ©   (16.08.07 11:41)  

> как правильно передать этот Exception основному потоку и
> там показать окошку с Exception и завершить этот поток?

http://dn.codegear.com/article/10452

--
Regards, LVT.


 
alles ©   (2007-08-16 13:07) [4]

Спасибо всем, иду читать :)



Страницы: 1 вся ветка

Текущий архив: 2007.09.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.024 c
15-1187166270
Fin
2007-08-15 12:24
2007.09.09
Delphi 5 под vista


15-1187253664
vajo
2007-08-16 12:41
2007.09.09
Intel чоппер


15-1187114748
anton773
2007-08-14 22:05
2007.09.09
Куда делось событие OnFileDownload у webbrowsera


2-1187526516
A
2007-08-19 16:28
2007.09.09
Объект


1-1183434626
Kolan
2007-07-03 07:50
2007.09.09
TStringGrid с объединёными ячейками, как реализовать?