北 北狼 Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-15 #22 还有个问题: TreeView控件里的父结点有没有一个序号是独立的就是和子结点分开的,比如jsxjd的程序 中调入子结点后,父结点中aa1.txt的序号还是0,aa2.txt还是1,请问有这种属性吗? 解决再给100分。呵呵~~~~~~~~```
还有个问题: TreeView控件里的父结点有没有一个序号是独立的就是和子结点分开的,比如jsxjd的程序 中调入子结点后,父结点中aa1.txt的序号还是0,aa2.txt还是1,请问有这种属性吗? 解决再给100分。呵呵~~~~~~~~```
J jsxjd Unregistered / Unconfirmed GUEST, unregistred user! 2002-08-16 #23 兄弟都是有索引( Index )的,你可以结合上面的代码,试一下下面的代码: procedure TForm1.Button2Click(Sender: TObject); var i:integer; begin for i:=0 to treeview1.items.count-1 do begin showmessage(format('%s %d',[treeview1.Items.text,treeview1.Items.index])); end; end;
兄弟都是有索引( Index )的,你可以结合上面的代码,试一下下面的代码: procedure TForm1.Button2Click(Sender: TObject); var i:integer; begin for i:=0 to treeview1.items.count-1 do begin showmessage(format('%s %d',[treeview1.Items.text,treeview1.Items.index])); end; end;