DELPHI如何读取cxcheckcombobox中的值

取显示的内容：
cxCheckComboBox1.Text
取已勾选的内容：
var
idx, cnt: Integer;
begin
cnt := cxCheckComboBox1.Properties.Items.Count;
for idx := 0 to cnt - 1 do
begin
if cbsChecked=cxCheckComboBox1.States[idx] then
begin
ShowMessage(cxCheckComboBox1.Properties.Items[idx].Description);
end;
end;
end;