TCheckBox: Komisches Verhalten mit Ereignis OnClick

[RWarnecke]

Hallo zusammen,

ich habe auf einer Form 3 Checkboxen. 2 davon sind gleich sichtbar und die dritte wird erst sichtbar, wenn bei der ersten und zweite Checkbox der Status False ist. In dieser Procedure setze ich den Status der Checkboxen :

Delphi-Quellcode:

procedure Form1.FormShow(sender: TObject);
begin
  CheckBox1.Checked := False;
  CheckBox2.Checked := False;
  CheckBox3.Checked := True;
end;

Zu jeder Checkbox ist der Ereignis OnClick definiert. Wird jetzt der Status für CheckBox1 und CheckBox2 gesetzt, wird das OnClick-Ereignis ausgeführt. Nur das OnClick-Ereignis von CheckBox3 wird leider nicht ausgeführt.

Wo ist der Fehler ?

[DeddyH]

Das kann ich hier nicht nachvollziehen. Kannst Du mal *.pas und *.dfm anhängen?

[edit] Was passiert, wenn Du im OI den Checked-Status von CheckBox3 auf false stellst? [/edit]

[RWarnecke]

Das wird etwas schwierig, da es in einem großen Projekt ist. Was für Infos bräuchtest Du denn noch ? Ich versuche gerade mal ein kleine Beispielprogramm zu machen.

[DeddyH]

Siehe mein Edit oben.

[RWarnecke]

Im Anhang ein Screenshot von den Properties der ChkBox. Alle drei Checkboxen haben die gleichen EInstellungen. Das habe ich schon kontrolliert.

[DeddyH]

Wenn Du Checked zur Laufzeit setzt, wird das OnClick-Ereignis nur dann ausgelöst, wenn Checked vorher anders stand (gerade zur Sicherheit ausprobiert).

[RWarnecke]

Ok, das könnte ein Grund sein. Wie kann ich es trotzdem realisieren, das wenn ich Checked setze, das OnClick-Ereignis ausgeführt wird ?

[DeddyH]

Vielleicht so?

Delphi-Quellcode:

procedure Form1.FormShow(sender: TObject);
begin
  CheckBox1.Checked := False;
  CheckBox2.Checked := False;
  if not CheckBox3.Checked then
    CheckBox3.Checked := True
  else
    CheckBox3Click(CheckBox3);
end;

[RWarnecke]

So hatte ich es zu erst. Da ich über die CheckBox3 eine andere Komponente aktiviere oder deaktiviere, fand ich die Lösung zwar für brauchbar aber nicht schön. Ich habe mittlerweile es so gemacht. Dass ich die zu aktivierende Komponente vom Visible Status genauso gesetzt habe wie der Status von CheckBox3 beim Start der Anwendung ist. Wird jetzt der Status von CheckBox3 nochmal geändert, so wird auch die abhängige Komponente entsprechend angezeigt.

Danke für Dein Hilfe Detlef. Bin wieder etwas schlauer geworden.

[DeddyH]

Gibt es denn keine Möglichkeit, die Logik besser von der Darstellung zu trennen? Weil wirklich dolle ist das so wie oben ja nicht gerade.