我用了 imagelist中的图片连接到treeview的image属性中去,动态的添加图片到每个节点,但是,节点上显示的全部是index为0的图片 ,另外做试验的时候遇到了,选择一个节点的时候图片变成了另外一张图片,大侠请指点迷瀞
解决方案 »
- 求助:非常非常急,各位大哥请给个把 DBGRID 里数据导入到 excel 的例子,好吗?
- Form继承问题
- fr中的自定义纸对应WINDOWS打印机的那种类型?
- 我买了一本DELPHI入门的书,但是整本书的内容对OBJECT PASCAL的内容讲的很少,而且讲的不论布雷的,
- 如何用比较简单的方法实现所见即所得的打印?就像office那样。。。
- 关于Delphi7的数据模块怎样用?
- delphi中用excel
- 50分求:VCL的层次图
- ADO如何实现SQL Server的Query Analyzer工具中的Cancel查询功能
- 关于一个Record的问题??
- 求助 Delphi7组件与分布式应用开发 上的InternetExpress例子的问题
- 如何向SQL 中text字段保存数据
添加一个节点的时候默认给下标为ImageList中的第一个图标。
procedure TForm1.Button1Click(Sender: TObject);
var
Node: TTreeNode;
begin
Node := TreeView1.Items.AddChild(nil, '新节点')
Node.ImageIndex := ImageIndex; //指定在ImageList中你要的图标的下标
end;选择的时候如果不想改图标可以在
procedure TForm1.TreeView1GetSelectedIndex(Sender: TObject;
Node: TTreeNode);
begin
Node.ImageIndex := ImageIndex; //指定在ImageList中你要的图标的下标
end;
P_Node:=TreeView1.Items.AddChild(nil,'tt');
P_Node.ImageIndex:=0;
P_Node.SelectedIndex :=2;