Hallo Albi,
wenn gruppe ein Integer ist, dann kannst du den Wert aus der CheckListBox wie folgt ermitteln:
Delphi-Quellcode:
{ clbox sei die CheckListBox }
with clbox do
begin
gruppe := 0;
for i := 0 to Count-1 do
if checked[i] then
gruppe := gruppe +Round(IntPower(2, i));
end;