TListView控件里的CheckBoxes设置为true
在CheckBoxes框里选中的时候,这个事件应该在哪里写?
多谢!
在CheckBoxes框里选中的时候,这个事件应该在哪里写?
多谢!
解决方案 »
- ShellTreeView创建文件夹的问题
- 前所未见...朋友们来看看啊..界面调用存储过程问题..
- WebBrowser的问题?
- 用delphi如何监听已经存在的端口?
- 兄弟们!,有谁知道桂林电子工学院咋样!女朋友去哪里签约去了,UP有分。
- 为何这两天收到大量带毒垃圾邮件?大家有这样的情况吗?
- 在线急等,Color 取反怎么取?
- Delphi 与Excel
- 缷载程序是怎么做的?
- 小型人事管理系统源码奉送(DELPHI+ADO+ACCESS开发)!!!!小弟的第一个程序要完工了,当然问题多多,高手低手都请进!
- 哪位大侠知道"卡片录入方式"应该怎样做(我说的不是dbgrid)!!!
- DBGrid中,如果要让用户可以对BDGrid中的数据进行修改,怎么做?
有问题请发信息到我的E-mail:[email protected]
procedure TForm1.ListView1Click(Sender: TObject);
var
pt: TPoint;
item: TListItem;
begin
GetCursorPos(pt);
pt := ListView1.ScreenToClient(pt);
item := ListView1.GetItemAt(pt.X, pt.Y);
if item <> nil then
if item.Checked then
ShowMessage(item.Caption + ' Checked!');
end;
begin
if ListView1.selected=nil then exit; if listview1.Selected.Checked=true then
beign
//..........
end;
end;