Как отловить сообщение в дочернем потоке?

← →
Shopot © (2005-08-01 17:12) [0]

Я делаю так.

var t1: THandle; Terminate: Boolean = False;

function WINAPI func(Param: Pointer)
begin
LoadData(...);

while not Terminate do
begin
...
end;

UnLoadData(...);
end;

procedure Form1.Button1OnClick()
begin
t1 = CreateThread (...);
Terminate = False;
ResumeThread (t1);
end;

procedure Form1.Button2OnClick()
begin
Terminate = True;
...
обновление данных
...
Button1.Click;
end;

Но главный поток не отдает управление дочернему пока не выполнится сам и поэтому дочерний поток не видит что данные изменились и не загружает их. Он просто не останавливается.
Что делать?

← →
Игорь Шевченко © (2005-08-01 17:15) [1]

> Как отловить сообщение в дочернем потоке

Иде сообщение ?

← →
Shopot © (2005-08-01 17:18) [2]

Да вот.

procedure Form1.Button3OnClick()
begin
SendMessage(t1, MY_MESSAGE);
end;

← →
Игорь Шевченко © (2005-08-01 17:52) [3]

> Shopot © (01.08.05 17:18) [2]

SendMessage() предназначена для отправки сообщений не потокам, а окнам

> Как отловить

а где и как ты собственно "ловишь" ?

Как отловить сообщение в дочернем потоке? Найти похожие ветки