Prüfen ob eine von 20 checkboxen gecheckt ist

[Minz]

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

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

Gruß Minz