ÇëÎÊ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ÏÂÊÔÒ»ÏÂ
ͬÒâÂ¥ÉÏ
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......