怎样给Treeview的节点自定义一个属性
我想给Treeview的节点添加一属性。该属性是整形变量。通过它来读或写节点。我添加后但不对。在运用时
我自己加的这个属性就是不出来。我是在delphi6\source\vcl\comctrls.pas中TTreeNode中加的。
private
//*********************
Faddress:integer;
public
//*********************
procedure Setaddress(const value:integer);
published
//*********************
property address:integer read Faddress write setaddress;
....
procedure TTreeNode.Setaddress(const value: integer);
begin
if value<>address then
Faddress:=value;
end;
请问有问题吗？有怎样做才能成功？
问题点数：20、回复次数：8Top
1 楼kirin（波塞冬）回复于 2005-07-23 16:28:41 得分 0
可以利用TreeView现成的Tag属性，也是整型的Top
2 楼lijinghe1（喜欢没有文化性格泼辣身材高大的女人）回复于 2005-07-23 16:44:52 得分 0
不要这样写程序，没法移植。修改VCL源码需要重建VCL库，或者在工程中加入vcl的源码路径Top
3 楼xqls（xqls）回复于 2005-07-23 19:12:59 得分 5
TreeView现成的Tag属性可以用到每个叶节点吗.现在有编号和标题,结果找不到放编号的地方,只能跟标题放在一起.比较难看.如何解决,谢谢.Top
4 楼lijinghe1（喜欢没有文化性格泼辣身材高大的女人）回复于 2005-07-23 19:49:47 得分 0
data指针可以指向一个任意的结构Top
5 楼xhai（小小）回复于 2005-07-24 17:32:11 得分 5
楼上的说的很队.
tmyData=PmyData^
tmydata=record
s:string;
i:integer;
end;
在程序要指定的时候先创建一个数据记录
mydata : tmydata
begin
new(mydata);
mydata.s := 'aaaa';
mydata.i :=1;
end;
tree.data := mydata;Top
6 楼youthon（可乐可口)(雪碧酷毙）回复于 2005-07-24 19:07:44 得分 0
如果只存一个序号的话，用tag就可以了，复杂的数据就得用treenode的data属性了Top
7 楼ntn115（飞静）回复于 2005-07-24 21:15:24 得分 5
data指针啊~~
指针就是一个32位无符号整形的啊
用的时候强制转换就可以了Top
8 楼wwle（海里的鱼到盘子里休息为了休息，被切成两半...）回复于 2005-07-25 01:00:43 得分 5
tmyData=^PmyData
tmydata=record
s:string;
i:integer;
end;
在程序要指定的时候先创建一个数据记录mydata : tmydata
begin
new(mydata);
mydata.s := 'aaaa';
mydata.i :=1;
end;
tree.data := mydata;
Top
