Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: WinAPI и системное программирование > Активизировать чужое окно

Автор: MadCoder 26.6.2008, 15:48

Здравствуйте!
Подскажите, как активизировать и передать фокус чужой программе.

Автор: MadCoder 26.6.2008, 16:47

Делается это так:

Код


procedure SwitchToThisWindow(h1: hWnd; x: bool); stdcall;
   external user32 Name 'SwitchToThisWindow';
          {x = false: Size unchanged, x = true: normal size}

 procedure TForm1.Button2Click(Sender: TObject);
 begin
   SwitchToThisWindow(FindWindow('notepad', nil), True);
 end;