delphi – 仅在单击树视图节点时执行事件
发布时间:2020-12-15 04:08:19 所属栏目:大数据 来源:网络整理
导读:我,(更多时间),当我点击树视图的项目时尝试执行操作,请参阅: procedure TForm1.TreeView1Click(Sender: TObject);begin if treeview1.Selected.AbsoluteIndex=1 then begin showmessage('selecionado'); end; end; 如果用户单击树视图的索引1,此代码将显示
我,(更多时间),当我点击树视图的项目时尝试执行操作,请参阅:
procedure TForm1.TreeView1Click(Sender: TObject); begin if treeview1.Selected.AbsoluteIndex=1 then begin showmessage('selecionado'); end; end; 如果用户单击树视图的索引1,此代码将显示一条消息,问题如下:如果用户选择索引1,将显示该消息,但在此之后,用户单击列表视图的空白区域消息仍然执行,因为该项仍然被选中.如何仅在用户单击相应项目时才能运行事件? 解决方法
不要使用OnClick,只要单击TTreeView(不仅在单击节点时),就会出现OnClick.而是使用
TTreeView.OnChange 事件,它将通过您的节点:
procedure TForm3.TreeView1Change(Sender: TObject; Node: TTreeNode); begin if Assigned(Node) then if Node.AbsoluteIndex = 1 then ShowMessage('selecionado'); end; (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |
相关内容
- Perl / regex删除字符串的前3行和后3行
- 探索Lua5.2内部实现:编译系统(2) 跳转的处理
- Delphi TListBox OnClick / OnChange?
- 【福利】如何挖掘数据中的价值?让它变更成真金白银?
- UPX 0.89.6 - 1.02 / 1.05 - 2.90 (Delphi) stub -> Mark
- delphi – 如何检查我的应用程序是否具有焦点?
- lua require路径设置实例
- neuraltalk2源码分析--eval.lua(完善中)
- Grails with ATS Transformation tutorial with a demo exa
- 使用perl,如何处理从命令行输入中获取的正则表达式?