TreeView控件(100分)

W

wlj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-14

• #1

建立一个TreeView控件，从数据库中循环取出一些数据（名称、编码），
将‘名称’插入TreeView控件Items的同时。怎样将‘编码’插入相应的Selected Index中。


本人刚学Delphi不久现碰到这个问题无法解决，不知各位能否帮助解决。
本人Email地址是:1976_wlj@sohu.com

 

A

autumn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-14

• #2

和使用TStrings的Object一样。

 

W

wlj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-14

• #3

能否详细说明一下？或举个例子？

 

J

Jams

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-14

• #4

>>

 

L

lczhuohuo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-14

• #5

用treeview的items属性的add方法，这个方法得到一个新节点，
得到这个节点后再设置相应的属性。这个方法有两个参数，
其中第一个参数是父节点，只要正确的选择父节点，就能够把
节点插入到正确的地方，例如如果插入到名称的子节点里，就可
以使用名称的节点作为第一个参数

 

C

cmldy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-14

• #6

使用 Data属性啦！！！

 

M

mech

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-14

• #7

var nownode:TTreeNode;
ss:array of string;
mmointer;
i:integer;
begin
setlength(ss,1);
i:=0;
query1.First;
while not query1.eof do
begin
ss:=query1.fieldbyname('no2').asstring;
mm:=pointer(ss);
i:=i+1;
setlength(ss,i+1);
nownode:=treeview1.items.addobject(nil,query1.fieldbyname('no1').asstring,mm);
query1.Next;
end;

 

F

Fudei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-14

• #8

var
treenote: TtreeNode;
begin
Treenode:=Treeview1.Add(nil,'名称');
Treenode.StateIndex:=编码;
不要用Selected Index, 它是当前选择节点的位图索引值, 有用处的。
如要添加子节点则使用AddChild函数.
AddChild(父节点，子节点名）函数返回该子节点.

 

W

wlj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-04-19

• #9

非常感谢!

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-08-16

• #10

多人接受答案了。