Home » Tipps & Tricks » Komponenten » TForm » Reagieren, wenn meine Anwendung minimiert wird

Reagieren, wenn meine Anwendung minimiert wird

Wird die eigene Anwendung minimiert, so soll sie u.U. in den Tray verschoben werden. Doch wie kann man das entsprechende Ereignis abfangen?

  TMainForm = class(TForm)
    ...
    procedure AppMinimize(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

procedure TMainForm.AppMinimize(Sender: TObject);
begin
 // Hier kann auf das Minimieren reagiert werden
end;


procedure TMainForm.FormCreate(Sender: TObject);
begin
 Application.OnMinimize := AppMinimize;
 ...