摘要: var i:integer; begin for I := 0 to CheckListBox1.Count -1 do if CheckListBox1.Checked[i] // 左边的 Check框 是否 勾中 then showmessage(CheckListBox1.Items[i] ) 阅读全文