Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "WinAPI";
Поточний архів: 2004.12.12;
Завантажити: [xml.tar.bz2];

Вниз

Згорнути абсолютно всі вікна Знайти схожі гілки


DelphiN! ©   (2004-10-28 06:46) [0]

Як згорнути всі вікна? Я пробував слати всім вікнам sc_minimize, також пробував ф-ію MinimizeAll компонента TShell, згортається майже все, але деякі ігри типу Half-Life НЕ сворачіваються, може хто знає як згорнути абсолютно все?



Дмитрий Ботвин   (2004-10-28 09:03) [1]

Ось це повинно всернуть все:

було
Count: integer;

function EnumProc (WinHandle: HWnd; Param: LongInt): Boolean; stdcall;
починати
if (GetParent (WinHandle) = 0) and (not IsIconic (WinHandle))
and (IsWindowVisible (WinHandle)) then
begin
PostMessage (WinHandle, WM_SYSCOMMAND, SC_MINIMIZE, 0);
Inc (Count);
end;
EnumProc: = true;
end;

procedure MinimizeAllWindows
починати
Count: = 0;
EnumWindows (@ EnumProc, 0);
end;



DVM ©   (2004-10-28 18:18) [2]


> Може хто знає як згорнути абсолютно все?

Все не згорнути. Якщо вікно не "хоче" їх зміниш. Більшість можна з пом. ShowWindow ()

> Дмитро Ботвін (28.10.04 09: 03) [1]

не зверне все.



сторінки: 1 вся гілка

Форум: "WinAPI";
Поточний архів: 2004.12.12;
Завантажити: [xml.tar.bz2];

Вгору





Пам'ять: 0.54 MB
Час: 0.072 c
3-1100148526
Andrey V.
2004-11-11 07:48
2004.12.12
Про версію FireBird


14-1100350021
Александр1
2004-11-13 15:47
2004.12.12
Допоможіть будь ласка!


14-1100949851
DelphiN!
2004-11-20 14:24
2004.12.12
Куди програма шле лист?


6-1096695984
Ivolg
2004-10-02 09:46
2004.12.12
передача


1-1101724057
Bobby Digital
2004-11-29 13:27
2004.12.12
Панель





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська