SC_CLOSE Message gibt anderes Resultat als Close;

[SC.CLOSE]

Hi, das kann sein, ja. Aber in meinem Test-Code befindet sich eine -showmessage- im FormClose-Event.
Diese showmessage wird beim Klick auf den Schließen-Button als auch beim Klick auf das X angezeigt.
Ebenfalls ist in dem FormClose-Event das unchecken der beiden RadioButtons vorhanden.

Demnach wird das Event ja bei beiden Klicks angesprungen. Aber weshalb re-checked der meinen RadioButton wieder, wenn ich das Formular per X schließe und dann erneut öffne?

Delphi-Quellcode:

// Unit1
procedure TForm1.Button1Click(Sender: TObject);
begin
 Form2.ShowModal;
end;

// Unit2:
procedure TForm2.Button1Click(Sender: TObject);
begin
 Close;
end;

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
 RadioButton1.Checked := False;
 RadioButton2.Checked := False;

 showmessage('FormClose touched!');
end;

procedure TForm2.FormShow(Sender: TObject);
begin
 RadioButton1.Checked := False;
 RadioButton2.Checked := False;
end;

Beim erneuten Öffnen des Form2-Formulars MÜSSTEN ja eigentlich die beiden RadioButtons Checked = False sein.