सभी TTreeView नोड्स को स्वतः कैसे विस्तारित करें?

Question

जब एप्लिकेशन शुरू होता है तो मैं मुख्य रूप पर पेड़ का विस्तार करना चाहता हूं। मैं इसे कैसे कर सकता हूं? मैं इसी संपत्ति को नहीं ढूंढ सकता। सी ++ बिल्डर 2009

Answer 1

आपको पेड़ दृश्य पर FullExpand() पर कॉल करने की आवश्यकता है।

Answer 2

जब treenode सच

करने के लिए अपनी विस्तार संपत्ति कर आप treeNode वस्तु के लिए एक संपत्ति मिलेगा जोड़ने, यह यो सच से पहले नोड्स की सूची में जोड़ने की स्थापना की।

और भी आप TreeView ExpandAll कहा जाता है के लिए एक विधि पा सकते हैं

मेरे सादर

---

इस कोड

//this will expand all nodes of Level and their parents 
procedure ExpandTree(Tree: TTreeView; Level: integer); 

    procedure ExpandParents(Node: TTreeNode); 
    var 
    aNode : TTreeNode; 
    begin 
    aNode := Node.Parent; 
    while aNode <> nil do begin 
     if not aNode.Expanded then 
     aNode.Expand(false); 
     aNode := aNode.Parent; 
    end; 
    end; 

var 
    aNode : TTreeNode; 
begin 
    if Tree.Items.Count > 0 then begin 
    aNode := Tree.Items[0]; 

    while aNode <> nil do begin 
     if aNode.Level = Level then begin 
     aNode.Expand(false); 
     ExpandParents(aNode); 
     end; 
     aNode := aNode.GetNext; 
    end; 
    end; 
end; 

//this will expand the Node and it's parents 
procedure ExpandNode(Node: TTreeNode); 
var 
    aNode : TTreeNode; 
begin 
    Node.Expand(false); 

    aNode := Node.Parent; 
    while aNode <> nil do begin 
    if not aNode.Expanded then 
     aNode.Expand(false); 
    aNode := aNode.Parent; 
    end; 
end; 

कोशिश करते हैं और देखते हैं संदर्भ http://www.delphipages.com/forum/showthread.php?t=159148

मेरे सादर

Answer 3

ऐसा करने के कई तरीके हैं। सबसे आसान स्वीकार किए जाते हैं जवाब में के रूप में

TreeView1.FullExpand; 

होगा - वैकल्पिक रूप से

if TreeView1.items.GetFirstNode <> nil then 
    TreeView1.items.GetFirstNode.Expand(True); 

या

if TreeView1.items[0] <> nil then 
    TreeView1.items[0].Expand(True); 

विस्तृत एक TTreeNode पर विधि उपयोगी है जब आप पूरी तरह से एक विशेष से विस्तार करना चाहते नोड जो रूट नोड नहीं है।