Wie heißen sie?
1.) Anzahl := 0;
Delphi-Quellcode:
if <Checkbox1>.Checked then inc(Anzahl);
if <Checkbox3>.Checked then inc(Anzahl);
...
2.) Checboxn heißen CheckBox1, CheckBox2, ...
Anzahl := 0;
Delphi-Quellcode:
for i := 1
to <Anzahl Checkboxen)
do
begin
if (FindComponent( "CheckBox'
+ IntToStr( i)) as TCheckBox).Checked then inc( Anzahl);
end;