So, da Du mit einer CheckListbox arbeiten darfst...
Wenn Du im ObjectInspector der Checklistbox die Rubrik events/Ereignisse
aufmachst findest Du dort das Event onClickCheck.
Diese Event wird ausglöst wenn ein Item Deiner CheckListbox angeklickt wird.
Hier ein kleine Starthilfe was du in dem event eintragen könntest.
Delphi-Quellcode:
procedure TForm1.CheckListBox1ClickCheck(Sender: TObject);
begin
if (sender
as TCheckListbox).Checked[(sender
as TCheckListbox).ItemIndex]
then
inc(counter)
else
dec(counter);
end;
Wobei counter der Zähler ist, der die Anzahl der bereits angekreuzten Zahlen beinhaltet.
Grüße
Klaus