一个关于TreeView的问题?????
var row,rownum,col,colnum:integer;
getstr:array of string;
begin
rownum=4;
colnum=16;
setlength(getstr,colnum);
for row:= 0 to rownum-1 do
begin
for col:= 0 to colnum-1 do
begin
//代码略,每row循环一次得出getstr数组的结果
end;
//现在要将getstr的每一元素当一个支点,在这里添加代码以实现利用TreeView建成树,怎样实现代码
end;
end;
//即循环3次获得getstr
第一次循环:
getstr={aa,bb,cc,dd}
第一次循环:
getstr={aa,bb,ff,dd}
第一次循环:
getstr={bb,cc,dd}
现在根据getstr数组3次的数据生成树结构:
aa
|_bb
|_cc
| |_dd
|_ff
|_dd
bb
|_cc
|_dd//请问怎样做好呢?
var row,rownum,col,colnum:integer;
getstr:array of string;
begin
rownum=4;
colnum=16;
setlength(getstr,colnum);
for row:= 0 to rownum-1 do
begin
for col:= 0 to colnum-1 do
begin
//代码略,每row循环一次得出getstr数组的结果
end;
//现在要将getstr的每一元素当一个支点,在这里添加代码以实现利用TreeView建成树,怎样实现代码
end;
end;
//即循环3次获得getstr
第一次循环:
getstr={aa,bb,cc,dd}
第一次循环:
getstr={aa,bb,ff,dd}
第一次循环:
getstr={bb,cc,dd}
现在根据getstr数组3次的数据生成树结构:
aa
|_bb
|_cc
| |_dd
|_ff
|_dd
bb
|_cc
|_dd//请问怎样做好呢?
解决方案 »
- ctrl+v等的实现
- 在Delphi2007下安装FastReport4.2出现错误,请各位给予解决!谢谢!
- formatDateTime怎么转换不成?
- 我想把数据库中的数据存放到一个数据结构中,以后遍历这个结构取数据就可以了,请问用什么数据结构好?有例子最好!
- 我想实现这样的效果,当点击一个SPEEDBUTTON1,打开一个FORM1,只有关闭FORM1,才能让点击SPEEDBUTTON2打开FORM2
- 如何设置,使得程序窗口随显示器不同而自动变化
- sql巨怪问题,我尝试了很久,没有找到答案。
- 双重指针的问题 100分
- 怎样为parodox表设置副索引?能否在设计期间指定副索引?
- 如何获取文件的更新时间
- 哪位有Socket控件使用经验,希望交流一下
- 如何从win32的DateTimePicker中分别取出年,月,日
Tnode.HasChildren可以用来判断是不是叶子节点。
我写了一个但有问题,帮手解决一下:
for i:= 0 to colk-1 do
begin
if recstr[i]<>' ' then
begin
treelist[rowk][i]:=recstr[i];
//Node1:=TreeView1.Items.GetFirstNode;
if (rowk<=1) or ((recstr[i]<>treelist[rowk-1][i])) then
begin
case i of
4:
begin
Node:=nil;
Node:=TreeView1.Items.AddChild(Node,recstr[i]);
end;
6,8,10,12:
begin
Node:=TreeView1.Items.AddChild(Node,recstr[i]);
end;
else
Continue;
end;
end else
begin
case i of
6,8,10,12:
Node:=TreeView1.Items.AddChild(Node,recstr[i]);
else
Continue;
end;
end;
end;
end;
大家帮手解决一下,或者写一个更好的