Problem mit Checkboxen

[oldmax]

Hi und willkommen
Nun, unbrauchbar machst du auch keine Radiogroup. Also, unbrauchbar heißt bei mir

Checkbox_n.Enabled:=False; wobei "_n" für eine Nummer steht und die aktivierte ausgeschlossen ist. Wenn ich's richtig verstanden habe, möchtest du eine Checkbox anklicken (auf Checked setzen) und die anderen auf Zugriff sperren. Erst wenn du Checked zurücknimmst, sollen die anderen freigegeben werden. Wenn dem so ist, bleibt dir nichts anderes übrig, als in Abhängigkeit der angeclickten Checkbox.Checked die anderen Enabled zu schalten, z.B.

Angenommen, es existieren 5 Checkboxen
Checkbox1, Checkbox2, Checkbox3, Checkbox4 und Checkbox5 und du clickst 3 an dann schreibst du in die Ereignisroutine onclick von 3 folgenden Code

Delphi-Quellcode:

Procedure TForm1.Checkbox3click(Sender.TObject);
Begin
  Checkbox1.Enabled:=not Checkbox3.Checked; // Enabled hat inversen Zustand von Checked
  Checkbox2.Enabled:=not Checkbox3.Checked;
  Checkbox4.Enabled:=not Checkbox3.Checked;
  Checkbox5.Enabled:=not Checkbox3.Checked;
end;

ist zwar ein bischen langweiliger Code, aber für's Verständnis reichts.
Gruß oldmax