VFP TREEVIEW添加子节点 KEY
如题,我在用VFP作一个目录树,但是在创建子节点的时候,子节点的KEY值提示不唯一
报错的内容:key is not unique in collection...
FOR i=1 TO 6
THIS.NODES.ADD(,,'LH'+ALLTRIM(STR(i)),area(i) ) &&第一级节点,地区
FOR j=1 TO 8
key_xt='XT'+ALLTRIM(STR(j))
this.nodes.add( 'LH'+ALLTRIM(STR(i)),4,key_xt,kind(j) ) &&第二级节点,系统分类
ENDFOR
ENDFOR
[解决办法]
你的代码改为:
For i=1 To 6
This.Nodes.Add(,,'LH'+Transform(i),Transform(i) ) &&第一级节点,地区
For j=1 To 8
This.nodes.Add('LH'+Transform(i),4,'XT'+Transform(i)+'_'+Alltrim(Str(j)),Transform(j) ) &&第二级节点,系统分类
Endfor
Endfor