如何在treeview中的一个节点展开的同时变化它左边的图标,我在它的onexpanding事件中写如下代码怎么总是失去焦点的时候图标才改变呢?
tv_zhb.Selected.ImageIndex :=1 ;
tv_zhb.Refresh ;
怎样才能在展开的同时同步改变,谢谢!
tv_zhb.Selected.ImageIndex :=1 ;
tv_zhb.Refresh ;
怎样才能在展开的同时同步改变,谢谢!
解决方案 »
- delphi读取.db文件里的一个blob字段
- 高分跪求! 关于idhttpserver
- 怎样由TBitmap的变量获得一个windows结构BITMAP的变量?
- EDLPH6 ado 连接 Sql2000 应注意什么?
- 庆祝我步入牢狱,兄弟结婚了,散分,明天此时结贴,
- 哪位高手能说说怎么优化SQLServer的性能吗?我。。。
- 高分请教:RichEdit的问题
- 再加50,100分了,求救!在线等待,解决即给分
- delphi
- 在combobox的Item中怎样输入汉字?
- 高分易得,一问难求!(如何实现类似java中eval函数功能)
- 遇到一个超高难度的数据库难题(SQL语句查询),一个多月都无法解决,分全给了---高手请进
在程序中动态添加节点时,Node1.ImageIndex:=0; Node1.SelectedIndex:=1; 就行了
procedure TForm1.TreeView1Expanding(Sender: TObject; Node: TTreeNode;
var AllowExpansion: Boolean);
begin
Node.ImageIndex:=11;
Node.SelectedIndex:=11;
end;//节点合拢的事件
procedure TForm1.TreeView1Collapsing(Sender: TObject; Node: TTreeNode;
var AllowCollapse: Boolean);
begin
Node.ImageIndex:=10;
Node.SelectedIndex:=10;
end;
数据库已经说过了。