Delphi-PRAXiS - Delphi Prüfen ob eine von 20 checkboxen gecheckt ist

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)

- - Delphi Prüfen ob eine von 20 checkboxen gecheckt ist (https://www.delphipraxis.net/11855-pruefen-ob-eine-von-20-checkboxen-gecheckt-ist.html)

Prüfen ob eine von 20 checkboxen gecheckt ist

hoi

sagen wir mal ich habe 20 checkboxen, wie prüf ich ob mindestens eine gecheckt ist? muss ich da 20 mal "if (CheckBox1.Checked) OR (CheckBox2.Checked) OR (CheckBox3.Checked) etc etc" schreiben? oder gehts auch eleganter?

Re: Prüfen ob eine von 20 checkboxen gecheckt ist

Hi,

schau Dir FindComponent an.

Re: Prüfen ob eine von 20 checkboxen gecheckt ist

grübel grübel,

du könntest glaub ich auch alle OnClick Ereignisse mit einer Prozedur verbinden, die eine Bool-Variable auf true setzt, wenn sie selbst zu true wird. Gleichzeitig musst du einen Zähler mitführen, der zählt wieviele auf true sind...ähm eigentlich reicht der Zähler :mrgreen:

nach der Art:

Delphi-Quellcode:

			procedure Form.CheckOnClick(Sender: TObject);

begin

  if Sender is TCheckBox then

    if Sender.Checked then inc(zaehler) else dec(zaehler);

end;

So dann verbindest alle mit CheckOnClick und du brauchst nur zahler abzufragen und weißt wieviele aktiviert sind. Weiß nicht ob der Code 100% stimmt, aber so ungefähr sollte es funzen :-D

Gruß Minz