Problem mit caHide im OnClose der Form

[oki]

Hi,

nun versteh ich die Welt nicht mehr. Das ist doch eigentlich ganz simpel. Ich will nur unter einer ganz bestimmten Bedingung die Anwendung schließen. Daz uhabe ich folgendes getan:

ein Property FUserClose : Boolean; definiert, welches ich wie folgt im OnClose berücksichtige

Delphi-Quellcode:

procedure TServerSocketForm.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
  If FUserClose then
    Action := cafree
  else
    Action := caHide;
end;

Ich habe überprüft, dass FUserClose zu diesem Zeitpunkt False ist und für Action caHide zugewiesen wird. Trotzdem wird meine Anwendung geschlossen.

wo ist mein Denkfehler?

Gruß oki