Какое сообщение послать окну, чтобы сделать его активным

Vadik(R)

Well-Known Member
12.12.2007
469
0
25
Волгоград
#1
Люди, какое сообщение надо послать хендлу окна, чтобы сделать его активным.
Вот, что пытался:
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
Hide;
Application.ProcessMessages;
H:=GetForegroundWindow;
Application.ProcessMessages;
Show;
Application.ProcessMessages;
SendMessage(H, WM_ACTIVATE, 0, 0);
Application.ProcessMessages
end;
Вместо WM_ACTIVATE пытался послать много констант начинающихся с SW_ или WM_, но так и не нашёл нужную. Почему-то всё равно активным делается моё приложение.