Anwendung minimiert ?

[turboPASCAL]

Anwendung in Tray... also in die TNA oder in die Taskleiste ?

Abfrage, hier mal mit einem Timer, der Application:

Delphi-Quellcode:

procedure TFormX.TimerXTimer(Sender: TObject);
begin
  if isIconic(Application.Handle)
    then Application.Title := 'Minimiert'
    else Application.Title := 'nicht Minimiert';
end;

Eine weitere Möglichkeit sind die Applications Events. TApplicationEvents OnMinimize OnRestore