delphi CheckListBox简单用法

本文整理自网络，侵删。

 //全选

var
i:integer;
begin
Checklistbox1.MultiSelect:=True;
for i:=0 to checklistbox1.Items.Count-1 do
CheckListBox1.Checked[i] := True;

//删除选中记录

for i:=CheckListBox1.Items.Count-1 downto 0 do
if checklistbox1.Checked[i]=True then
Checklistbox1.Items.Delete(i);

//删除全部

Checklistbox1.MultiSelect:=True;
Checklistbox1.SelectAll;
Checklistbox1.DeleteSelected;
 

相关阅读 >>

Delphi getcomputername() getusername() 获取本机当前用户名

Delphi 中 inputquery 实现密码输入

Delphi 另类计算程序代码运行耗时

Delphi sysutils.wraptext - 换行

Delphi中补齐字符串长度

Delphi 过滤网页代码 <script></script>

高手谈做程序员的8大基本原则

Delphi实现电脑端微信图片文件解密

Delphi xe7 up1 调用android振动功能

Delphi now 返回当前日期及时间

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi CheckListBox简单用法