ÇëÎÊDelphiÓÐÊ÷ÐοؼþÂð£¿
ÔõÑùʹÓã¿
Ttreeview
treeview.items.addchild(nil(Éϼ¶½Úµã),'°¸·¢Ê±·¢'(text));
raize ¿Ø¼þ°üÀïÃæÓУ¬csdnÓÐÏÂÔØµÄ
²é°ïÖúTTreeViewºÍTNodeÁ½¸öÀà
TTreeView
ÍøÉÏËÑһϣ¬×ÊÁÏÒ»´ó¶Ñ
treeview¡£ÒªÊµÀýµÄÍøÉϺܶ࣬¹ØÓÚÊý¾Ý¿âµÄÒ²ÓС£
¿ÉÒÔ¿¼ÂÇʹÓÃvirtual treeview.Õâ¸ö¶«¶«±È½Ï¸´ÔÓ£¬µ«¹¦Äܷdz£Ç¿´ó¡£²»¹ýÄãÊdzõ´ÎʹÓã¬Ï°¹ß¾ÍºÃÁË¡£
ÒªÒýÓÃЩʲô°ü£¿
Òª²»ÒªÏÂÔØÐ©Ê²Ã´²å¼þ£¿
Ö±½ÓÍùÉÏÍϾÍÊÇÁË
treeviewÊDZê×¼¿Ø¼þ
virtual treeviewÊǵÚÈý·½¿Ø¼þ£¬µ«ÊÇÃâ·Ñ¿ªÔ´µÄ
dev cxTreeList,¸üÇ¿´ó¡£
procedure TForm1.FormCreate(Sender: TObject);
var
Nodes: TTreeNodes;
node: TTreeNode;
begin
TreeView1.Align := alLeft;
Nodes := TreeView1.Items;
node := Nodes.Add(nil, 'aaa');
node := Nodes.AddChild(node, '111');
node := Nodes.AddChild(node, 'AAA');
node := Nodes.AddChild(node, 'BBB');
Nodes.Add(node, 'CCC');
Nodes.Add(node, 'DDD');
Nodes.Add(node, 'EEE');
node := node.Parent;
Nodes.Add(node, '222');
Nodes.Add(node, '333');
node := node.Parent;
Nodes.Add(node, 'WWW');
Nodes.Add(node, 'QQQ');
node := node.Parent;
Nodes.Add(node, 'LLL');
end;
×Ô¼ºÔÚDELPHIÏÂÊÔÒ»ÏÂ
ͬÒâÂ¥ÉÏ