Wenn du verhindern willst, dass die Items nicht ausgewählt werden können, kannst du im OnSelect folgendes machen:
Delphi-Quellcode:
if (CheckListBox1.itemindex < 5) and (CheckListBox1.Selected[CheckListBox1.itemindex]) then
begin
CheckListBox1.Selected[CheckListBox1.itemindex] := False;
end;
Wenn diese nicht gechecked sein dürfen, dann im OnClickCheck:
Delphi-Quellcode:
if (CheckListBox1.itemindex < 5) and (CheckListBox1.Checked[CheckListBox1.itemindex]) then
begin
CheckListBox1.Checked[CheckListBox1.itemindex] := False;
end;
Das Konzpt, von KodeZwerg würde ich vermutlich auch nehmen, aber ich weiß nicht, ob du meinen deinen Kenntnissen schon damit klar kommst.