Как на Delphi можно свернуть и развернуть чужое окно в Windows
Нам понадобится Timer(Sistem)
В событие OnTime Таймера, прописываем:
procedure TForm1.Timer1Timer (Sender: TObject); var h : HWND; begin h := GetWindow(Handle, GW_HWNDFIRST); while h <> 0 do begin if (IsWindowVisible(h) and (GetWindow (h, GW_OWNER) = 0) and (GetParent(h) = 0)) then PostMessage(h, WM_SYSCOMMAND, SC_MINIMIZE, 0); h := GetWindow(h, GW_HWNDNEXT); end; end;
SC_MINIMIZE - свернуть окно в Windows SC_MAXIMIZE - развернуть окно в Windows