Почему HWND_BROADCAST сообщение приходит 2 раза? [D7, XP]
Alex_C © (2007-04-09 11:45:00)
Нужно сделать простенькое общение между програми. В проге
приемнике делаю так:
procedure TForm1.AppMessage(var Msg:TMsg;var
Handled:Boolean);
begin
if Msg.Message = My_Message then
begin
Memo1.Text := '123435';
Handled :=True;
end
else
Handled:=False;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMessage:=AppMessage;
My_Message :=
RegisterWindowMessageA('My_Message');
end;
Затем в другой проге делаю вызов
PostMessage(HWND_BROADCAST,My_Message,0,0);
Но почему-то в мемо 2 раза появляется строчка '12345'
Сергей М. (2007-04-09 11:50:00) [1]
Потому что сообщение поступает и гл.окну приложения и окну
формы, ибо оба этих окна являются top-level-окнами.
Наверх 
ЧАТ |
Орешник |
|
