-
-
delphi中treeview的修改
-
发表于:
2010-11-1 16:27
7941
-
最近朋友拿给我一个软件,其中有一个地方感觉很奇怪。
运行程序后,在最左边有个水印。通过资源查看工具得知是一个OnCustomDraw事件控制的。资源查看器中对应的代码如下:
object trvTask: TTreeView
Left = 0
Top = 0
Width = 153
Height = 305
Align = alClient
AutoExpand = True
BevelInner = bvNone
BevelOuter = bvNone
HideSelection = False
Images = ResourceForm.SmallImageList
Indent = 19
ParentShowHint = False
ReadOnly = True
ShowHint = True
ShowLines = False
StateImages = ResourceForm.SmallImageList
TabOrder = 0
OnChange = trvTaskChange
OnCustomDraw = trvTaskCustomDraw
Items.NodeData = {
0304000000260000005600000056000000FFFFFFFFFFFFFFFF00000000000000
00000000000104636B2857D1530190240000005700000057000000FFFFFFFFFF
FFFFFF0000000000000000000000000103F25DD1530190240000005900000059
000000FFFFFFFFFFFFFFFF000000000000000000000000010349833F7AB17B24
0000005800000058000000FFFFFFFFFFFFFFFF00000000000000000000000001
03DE563665D97A}
end
现在的问题是,怎么才能修改这个水印的内容或者颜色或者直接去掉这个水印。
我试过直接去掉OnCustomDraw = trvTaskCustomDraw这句,可以实现去掉的目的,但在他软件的地址薄中会提示出错。各位大侠有没有完美些的解决方法。
[培训]内核驱动高级班,冲击BAT一流互联网大厂工作,每周日13:00-18:00直播授课