Передача сообщений из потока

← →
TGrey (2004-06-04 10:34) [0]

Доброго времени суток!
Подскажите, каким образом можно передать сообщение из потока, а затем обработать в приложении.
Знаю, что надо через PostMessage, но не выходит, нужен пример.

← →
Polevi © (2004-06-04 10:36) [1]

входит, выходит.. замечательно выходит (с)

а у тебя значит не выходит.. печально
покажи свой код

← →
Digitman © (2004-06-04 11:08) [2]

const WM_MYMESSAGE = WM_USER + 1000; TMyThread = class(TThread) private FWnd: THandle; protected procedure Execute; override; public constructor Create(CreateSuspended: Boolean; WndHandle: THandle); end; constructor TMyThread.Create; begin FWnd := WndHandle; inherited Create(CreateSuspended); end; procedure TMyThread.Execute; begin .. PostMessage(FWnd, WM_MYMESSAGE, 5, 10); .. end; .. TMyForm = class(..) private procedure MsgMyMessage(var Message: TMessage); message WM_MYMESSAGE; end; procedure TMyForm.FormCreate(Sender: TObject); begin MyThread := TMyThread.Create(False, Handle); end; procedure MsgMyMessage(var Message: TMessage); begin ShowMessage(Inttostr(Message.wParam) + " " + Inttostr(Message.lParam)); end;

← →
Григорьев Антон (2004-06-04 11:52) [3]

А если на PostMessage breakpoint поставить, останавливается?

Передача сообщений из потока Найти похожие ветки