delphi listview1 中添加check选中事件

本文整理自网络，侵删。

 delphi listview1 中添加check选中事件


请在ListView1MouseDown 中添加如下代码，即可完成;

var
Item: TListItem;
begin
Item := ListView1.GetItemAt(X, Y);
if (Button <> mbLeft) or (Item = nil) then Exit;
if htOnStateIcon in ListView1.GetHitTestInfoAt(X, Y) then
begin
if not Item.Checked then
showmessage(item.SubItems[2])
else

end;

 

相关阅读 >>

Delphi 英文单词第一个字母大写

Delphi使程序的窗口出现在最前面并激活

Delphi的tservice的windows�入桌面切�q

Delphi 删除internet临时文件

Delphi反调试【初级】检测法

Delphi 以十六进制显示数据内容

Delphi:窗体的扩展样式gwl_exstyle用于setwindowlong

Delphi 计算ip地址范围

Delphi firemonkey 图片显示拉伸不变形

Delphi 语言字符集

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

转载请注明出处：木庄网络博客 » delphi listview1 中添加check选中事件