怎样判断CheckListBox中的项目是否全被选中？

你所说的被选中是什么，是Checked还是Selected,
如果是Selected可用下面的代码，
CheckListBox.SelCount = CheckListBox.Items.Count
如果是Checked则要用一个循环来判断。
AllSelected := True;
for I := 0 to CheckListBox.Items.Count - 1 do
  if not CheckListBox.Checked[I] then
  begin
    AllSelected := False;
    Break;
  end;