请问如何给treeview的树支增加文件夹的图形?(100分)

  • 主题发起人 主题发起人 bbzy
  • 开始时间 开始时间
B

bbzy

Unregistered / Unconfirmed
GUEST, unregistred user!
我做的treeview的分支是日期类,由select dict rq from table1得到,
不知如何在每一个分支前增加一个类似windows那种文件夹图形?
 
看看它的images属性
 
我已其images指向一个imageslist,
请述祥细,谢谢!
 
这是我的程序的一段代码,可能根你的不一样,不过你自己在机上试一试就容易
理解了。

在imageslist里放入两个图像

procedure TForm1.FormCreate(Sender: TObject);
var
i: integer;
begin
TreeView1.Items[0].ImageIndex := 2;
TreeView1.Items[0].SelectedIndex := 2;
for i := 1 to TreeView1.Items.Count - 1 do
TreeView1.Items.SelectedIndex := 1;
end;
 
设置TTreeview下每一个TTreeNode的ImageIndex(默认图标)、SelectedIndex
(被选中时的图标)为imagelist中对应的图标的序号即可。另外还有StateIndex
和OverlayIndex与图标相关。
 
在<a href="http://glowing.yeah.net">我的主页</a>有一个关于如何生成一个类似资源管理器那样的例程,
它用的是LISTVIEW,不过TREEVIEW也差不多,您可以下载试。
在“例程文章”页,名称好象是“Win95 filelist...”
 
谢谢各位,分数定将奉送,不好意思,再问一句:如何使分支成阴影,分支变成阴影的事件是什么?
 
>>如何使分支成阴影

设置TreeView的“HideSelection”的属性
如果焦点转移到另一控件上,选定的树结点就会成阴影。
 
真让我长了见识,我用了快三年DELPHI,还从来没注意这个呢!
的确可以做到。 HideSelection := False;
 
hehe
来迟了来迟了
treeview我最熟了...

呜.....
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部