Minimer alt

Dette function simulerer bare Win+m.

begin
Keybd_event(VK_LWIN, 0, 0, 0);
Keybd_event(Byte('M'), 0, 0, 0);
Keybd_event(Byte('M'), 0, KEYEVENTF_KEYUP, 0);
Keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP, 0);
end;

Brug denne funktion:

function EnumWindowsFunc(Handle: THandle): boolean ; stdcall;
begin
   if iswindowvisible(Handle) then
   begin
     SendMessage(Handle, WM_SYSCOMMAND, sc_minimize ,0);
   end;
   Result :=True;
end;

kald den så med EnumWindows(@EnumWindowsFunc, LParam(0));

den vil minimere alle windows og de popper ikke alle op når du klikker..

Jeppe Johansen
Jeppesoftware@hotmail.com

kender den godt, men når jeg gør det og så klikker på et ikon i taskbaren så åbner alle vinduer