当点击CheckListBox的Checked的时候，如何判断当前是打勾还是取掉？

Question

Delphi有CheckListBox组件吗？你说的应该可以实现的！拿你的程序看看阿！

Answer 1

是chechbox吧!!如果是ChechBox的话!有一个属性cheched,如果是真表示当前选中!

Answer 2

有个属性“OnClickCheck ()”事件，在里面加判断即可。
......
example:
  if CheckListBox1.Checked[0] or
     CheckListBox1.Checked[1] or
     CheckListBox1.Checked[2] then
  begin
    ....
    ....
  end;

Answer 3

还是用循环吧，尤其是还可能存在多选的情况！
不要循环所有项，只循环已选项不就行了！
（SelectCount、Selected[Index]）

Answer 4

i:integer;
for i:=0 to CheckListBox1.Count-1 do
   if CheckListBox1.Checked[i] then //打钩
   else // 无打钩

Answer 5

楼上说的对！
我刚刚试过
 checklistbox1.checked[0]=true
表示checklistbox1的第一个字段前打勾
checklistbox1.checked[1]=true
表示checklistbox1的第二个字段前打勾
依此类推

Answer 6

看来还是不行啊，非用循环不可了？
wangchinaking(Deemon）的方法如果有很多怎么办？呵呵

Answer 7

if checklistbox1.checked[checklistbox1.itemindex] then 
showmessage('choose')
else
showmessage('no choose');`

Answer 8

if CheckListbox1.ItemIndex>=0 then
  if CheckListBox1.Checked[CheckListbox1.ItemIndex] then
    ShowMessage('Item'+CheckListbox.Items[CheckListbox1.ItemIndex]+'Checked');

Answer 9

lwk_hlj(阿凯) ：
你的方法基本上可以，checklistbox1.itemindex代表当前选中的item
的index