Вниз
Скачать: CL | DM;

существование обьекта   Найти похожие ветки 

← →
feniks   (2002-12-20 13:08) [0]

Как правильно определить существование обьекта, к примеру - потока? У меня создается поток, в него передается строка запроса, и поток потихоньку с низким приоритетом запрос отрабатывает. После сам умирает. Но тут - новая порция данных с сокета. Если поток существует - ее надо сложить в буфер, если нет - создавать и запускать новый.
Проверка на nil неэффективна, даже вызывает ошибку если обьект не определен. По логике - если not suspended, но тоже не проходит, иногда происходит попытка создания нового потока, когда старый еще существует но уже suspend.
спасибо за советы.


← →
AlexSV ©   (2002-12-20 13:46) [1]

Решал как-то аналогичную задачу, только без пополнения буфера и suspend"а.
Если я правильно понял, то FreeOnTerminate := True.
В этом случае необходимо установить в nil указатель на поток когда он разрушается.
Если так, то из destructor"а пошли объекту, в котором храниться указатель на поток message, а в обработчике message"а установи указатель в nil.
Если не понятно объяснил, то пиши на mail, вышлю пример.


← →
Digitman ©   (2002-12-20 13:48) [2]


> После сам умирает


Не давай ему самому (бесконтрольно со стороны создавшего его кода) "умирать". Пусть он "крутится" в цикле (в Execute-процедуре), ожидая новой строки запроса. Есть новая строка - исполняет и снова ждет, нет - просто ждет (как минимум проверяя св-во Terminated)


← →
Polevi ©   (2002-12-20 13:48) [3]

hEvent:=CreateEvent(nil,false,false,nil)

TSomeThread.Execute;
begin
SetEvent(hEvent);
try
..
..
finally
ResetEvent(hEvent);
end;
end;

в коде проверяй, если ивент сигналит - значит поток работает


← →
feniks   (2002-12-20 16:11) [4]

Спасибо большое, коллеги. Все понятно, сделаю.



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c
14-1881
PaRL
2002-12-12 22:29
2003.01.02
Книга


14-1866
Anatoly Podgoretsky
2002-12-12 07:47
2003.01.02
Именинники 12 декабря


1-1821
Alexaniok
2002-12-20 20:57
2003.01.02
Как запустить консольное приложение из Delphi?


6-1848
nickolayLI
2002-10-21 07:16
2003.01.02
найти тачку в сети с заданным портом


14-1857
dimonf
2002-12-11 17:23
2003.01.02
Нужен компонент типа Gauge в виде круга, типа как в The Bat.




   Наверх