Ist im Grunde genommen das Selbe
[win]+D = show
Desktop
[win]+M =
Minimize all
Delphi-Quellcode:
Interface
Type TForm0 = Class(TForm)
Procedure FormCreate(Sender: TObject);
Private
Procedure FormMinimize(Sender: TObject);
Procedure FormRestore(Sender: TObject);
End;
Implementation
{$R *.dfm}
Procedure TForm0.FormCreate(Sender: TObject);
Begin
Application.OnMinimize := FormMinimize;
Application.OnRestore := FormRestore;
End;
Procedure TForm0.FormMinimize(Sender: TObject);
Begin
//wurde minimiert
End;
Procedure TForm0.FormRestore(Sender: TObject);
Begin
//wurde wuederhergestellt
End;
End.
weiteres siehe ... einfach mal in deinem Programm "Application." eingeben