如何遍历checkboxlist，将选中的checkbox的caption读出来，成为一个字符串。

Question

如：
    √上海
      深圳
    √包头
提出成为  “上海、包头”本来以为用
         for i:=0 to checklistbox1.Items.Count do begin
           if checklistbox1.Items[i].checked then
           s1:=s1+checklistbox1.items[i].text
           ...
就可以，写的时候发现checklistbox 没有checked属性。怎么办，请帮忙

Answer 1

看一下 ComboBox1.ItemIndex 有用不！

Answer 2

var
  i: integer;
begin
  for i := 0 to ckb.Items.Count-1 do
    if ckb.Checked[i] then
      showmessage(ckb.Items[i]);
end;