[Delphi] Функция сворачивания всех окон - Форум Cheat-Master.ru
  • Страница 1 из 1
  • 1
Модератор форума: Alowir, Sanoxxx  
Форум » Программирование » Delphi Программирование » [Delphi] Функция сворачивания всех окон
[Delphi] Функция сворачивания всех окон
Mewex Дата: Понедельник, 10.04.2017, 21:54 | Сообщение # 1
STEAM SELLER
Сообщений: 475
Статус: Offline
Код
function EnumMiniProc(Wnd : HWND; Param : Longint) : Boolean; stdcall;  
begin  
  Result := True;  
  if (Wnd = Param) or (Wnd = Application.Handle) then  
    Exit  
  else if isWindowVisible(Wnd) and not isIconic(Wnd) and isWindow(Wnd) then  
    ShowWindow(Wnd, SW_MINIMIZE);  
end;

Чтобы вызвать функцию, кидаем следующий код, на кнопку или куда-то:

Код
EnumWindows(@EnumMiniProc, Handle);

Добавлено (10.04.2017, 21:54)
---------------------------------------------
Ап

Сообщение отредактировал Junger - Воскресенье, 09.04.2017, 12:12
Форум » Программирование » Delphi Программирование » [Delphi] Функция сворачивания всех окон
  • Страница 1 из 1
  • 1
Поиск:
Статистика Форума
Лучшие пользователи
Admin [39113]

GеNius [7209]

[CM]Russel [5557]

kenlo763 [4952]

[CM]AGRESSOR [4639]

Snake_Firm [4452]

Сэс [4416]

Artem_Buero [4223]

[CM]Durman [3204]

[CM]Рафаэль [3080]

iMaddy [2855]

sky_Woker [2854]

getrekt [2745]

Новые пользователи
stephensh5 [12:00]

calliesv7 [06:11]

louqm16 [22:14]

artushak [16:32]

Kingpolker [15:42]

leeyv11 [15:12]

Trappa17 [01:00]

Djamalchik [16:40]

ajeense [14:24]

654470559 [08:55]

Newtone [03:01]

godspeed [21:31]

herminiadb10 [13:43]