como minimizar todos os aplicativos aberto

Question

Como minimizar todos os aplicativos aberto na esta��o,
na abertura do meu aplicativo ?

ou seja, quando meu aplicativo for executado gostaria de executar uma rotima tipo o que o windows faz assim:

Windows+M

n�o sei se ddeu pra entender !!!

Paullsoftware · Answer

Conhe�o duas rotinas para isso, mais prefiro essa:

uses ShlObj, ComObj;
procedure HideAll; 
var 
   Shell : OleVariant; 
begin 
   Shell := CreateOleObject(�Shell.Application�) ; 
   Shell.MinimizeAll; 
end;

a outra seria simular o precionamento da sequencia Windows + M

proedure WinM;
begin
 keybd_event(VK_LWIN, 0, 0, 0); 
 keybd_event(Ord(�M�), 0, 0, 0); 
 keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP, 0);
end;

espero ter ajudado :wink:

Fabiano G�es · Answer

valeu �paullsoftware�isso mesmo que eu precisava !!!!um abra�o !!!...

F�rum como minimizar todos os aplicativos aberto #324932