Application.Restore über TrayIcon problem

[thomas2009]

ja, ich möchte wenn man Form2 minimiert, dann muss das Programm Komplet minimiert werden (Application.Minimize) und nicht nur Form2

ich habe eine Komponent von ApplicationEvent auf meine Form gezogen

Delphi-Quellcode:

procedure TForm2.ApplicationEvents1Minimize(Sender: TObject);
begin
Application.Minimize;
end;

aber das passiert nichts wenn ich folgendes mache um das Programm in Desktop zu sehen :

Delphi-Quellcode:

procedure TForm2.TrayIcon1DblClick(Sender: TObject);
begin
Application.Restore;
end;