Как послать сообщение потоку процесса и отловить его?

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

Создаю поток:

const
MY_MESSAGE = WM_USER + 100;

var
t: THandle;

function WINAPI func (Param: Pointer)
begin
while (...) do
begin
...
ждем сообщения MY_MESSAGE; как его здесь поймать?
end;
end;

procedure Form1.StartThreadOnClick(...)
begin
t = CreateThread (0, 0, func, Form1.Handle, ...);

ResumeThread (t1);
end;

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

← →
DVM © (2005-08-01 17:42) [1]

PostThreadMessage()?

1. PostThreadMessage.
2. Поток должен создать очередь сообщений,(например, PeekMessage), затем в цикле(GetMessage) выбирать сообщения из очереди.

Как послать сообщение потоку процесса и отловить его? Найти похожие ветки