Použitie OLE objektov pre minimalizáciu aplikácií.

uses ComObj ;
 
procedure Shell_MinimizeAll;
var
   Shell : OleVariant;
begin
   Shell := CreateOleObject('Shell.Application') ;
   Shell.MinimizeAll;
end;