Moin
Ich möchte, dass meine Anwendung per Klick auf das "X" oben rechts minimiert wird (es wird dann in der
TNA eingetragen).
Versucht habe ich's so:
Delphi-Quellcode:
//OnCloseQuery
if MinimizeAtClose then
begin
Application.Minimize;
CanClose := false;
end else
CanClose := true;
und so:
Delphi-Quellcode:
//OnClose
if MinimizeAtClose then
begin
Application.Minimize;
Action := caNone;
end;
beides geht nur einmal gut, danach passiert bei Klick auf "X" nichts mehr.
Und wenn ich die Anwendung so in die
TNA minimiere und doppelt auf das
TNA Icon klicke, wird das Fenster nur im Hintergrund sichtbar, was mir auch ein Rätsel ist.
Kann mir jemand sagen, wo der Fehler liegt?