Minimizar todo

[marcoszorrilla]

procedure MinimizeAll;
begin
{ [Window key] + 'M' minimizes all windows, [Win][Shift] + 'M' restores them }
keybd_event( VK_LWIN, MapvirtualKey( VK_LWIN, 0), 0, 0 );
keybd_event( Ord('M'), MapvirtualKey( Ord('M'), 0), 0, 0 );
keybd_event( Ord('M'), MapvirtualKey( Ord('M'), 0), KEYEVENTF_KEYUP, 0 );
keybd_event( VK_LWIN, MapvirtualKey( VK_LWIN, 0), KEYEVENTF_KEYUP, 0 );
end;

[Bicho]

Hola Marcos, creo que éste truco esta repe

<a href=http://www.clubdelphi.com/trucos/index.php?id=69>
aquI&acute
</a>

Y además Roman ya dio su versión del truco.

Saludos

[AGAG4]

No me funciono, no se minimiza todo.