[keyboy]

Otra manera:

Código Delphi [-]
// Minimizar ventanas
var
  Shell: OleVariant;

begin
  Shell := ComObj.CreateOleObject('shell.application');
  Shell.MinimizeAll;
end;

Código Delphi [-]
// Restaurar ventanas
var
  Shell: OleVariant;

begin
  Shell := ComObj.CreateOleObject('shell.application');
  Shell.UndoMinimizeAll;
end;

Bye