schau dir einfach mal Application.OnMinimize an. Bsp.:
Delphi-Quellcode:
procedure TForm1.Minimizeproc(Sender: TObject);
begin
//das was beim minimieren passieren soll
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMinimize := Minimizeproc;
end;