На главную

Найти активное окно
Найти активное окно ОГЛАВЛЕНИЕ    HOME  MAIL


Чтобы получить Handle активного окна (не важно, ваше оно или нет) нужно воспользоваться функцией GetForegroundWindow. Приведенная программа каждую секунду пытается развернуть активное окно.
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  ShowWindow(GetForegroundWindow, SW_MAXIMIZE);
end;

главная страницазадать вопрос
email: delphi4all@narod.ru
Hosted by uCoz