如何删除CheckListbox列表框的选中的项？

Question

j:=checklistbox1.Items.Count-1 
for i:=j downto 0  do
  if checklistbox1.Selected[i] then
    checklistbox1.Items.Delete(i);
ok

Answer 1

如果选中了好几个，在循环判断是否有被选中的项时，只有当前高亮显示的被选中的项的Selected值为True，其余选中的项的Selected的值为什么是false???

Answer 2

with CheckListbox1.Items do
  for i:=Count-1 downto 0 do
    if Checked[i] then Delete(i)
selected标记是否被选中
Checked标记是否被选择成"√"