Dicas - Minimizar todas as janelas

Veja nesta dica, como minimizar todas as janelas ativas do sistema operacional.

Como minimizar todas as janelas em seu computador

 

uses ShlObj;

…

procedure Shell_MinimizeAll;

var

  Shell: OleVariant;

begin

  Shell := CreateOleObject('Shell.Application') ;

  Shell.MinimizeAll;

end;

Ebook exclusivo
Dê um upgrade no início da sua jornada. Crie sua conta grátis e baixe o e-book

Artigos relacionados