我不确定你是否想要这个.
你必须使用CheckListBox1.Checked[i]功能
此代码将返回TCheckListBox中的已检查项及其索引.
for I := 0 to CheckListBox1.Items.Count - 1 do
begin
if CheckListBox1.Checked[i] then
begin
ShowMessage('Item at index ' + IntToStr(i) + ' is selected.' +
'Its value is '+ CheckListBox1.Items.Strings[i]);
end;
end;
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
6862 次 |
| 最近记录: |