谁有可以用图片做背景的TreeView组件,或者TeeTree组件?给我一份吧!(50分)

  • 主题发起人 主题发起人 lectureke
  • 开始时间 开始时间
L

lectureke

Unregistered / Unconfirmed
GUEST, unregistred user!
我用Delphi5.0企业版自带的TreeView组件,但是没办法在其底下设置一幅图片
(就象NetAnts 1.25中的“树”一样)。
听说过TeeTree组件的功能很强大,但我在www.teemach.com上下载的免费版本根本不能用!
或许我不会用,现在求助于大家!组件也好,控件(ocx)也好!
 
直接用标准的TreeView画出背景如何?

procedure TForm1.TreeView1CustomDraw(Sender: TCustomTreeView;
const ARect: TRect; var DefaultDraw: Boolean);
var
bmp : TBitmap;
begin
try
bmp := TBitmap.create;
bmp.Loadfromfile('e:/paper/bg.bmp');
with Treeview1.Canvas do
begin
Brush.Bitmap := bmp;
FillRect(ARect);
// StretchDraw(ARect, Image1.Picture.Bitmap); //自动适应区域大小
end;
DefaultDraw := True;
finally
bmp.free;
end;
end;
 
不行,我试过你这种方法,当展开“树”的时候,图象跟着树移动了,而且有分支的
地方没有图象!(没有透明效果)
 
没试过,但用他原来的东西应该可以实现!
 
用他原来的东西真的不能可以实现!画出来的图不稳定!
 
我这里有一个,自己开发的组件,给你传过去!
 
email:lectureke@163.com
 
能不能也给我一份!
zxrsong@sina.com.cn
 
关注,我早就想知道了.


wy0311@hotmail.com
 
你可以参考Delphi的Demo呀
 
能不能也给我一份! delphi680@163.com 谢谢
 
用现成的,到网上去下载infoPower控件组,他的dbtreeview绝对管用
 
1stclass3000用过吗?
 
1stclass3000,太慢!
 
应该可以在TreeView加上底图,不过要完全自绘才行。
 
后退
顶部