ExpandTopLevelNodes method
|
ExpandTopLevelNodes method
|
|
| acTreeView component (and acTreeComboBox as subproperty of TreeOptions structure).
|
| procedure ExpandTopLevelNodes;
|
| The ExpandTopLevelNodes method expands all the top-level nodes in the tree-view. The "top-level" nodes is the nodes where the Parent property is nil (no upper node).
|
| procedure TacTreeView.ExpandTopLevelNodes;
|
| var
|
| I: Integer;
|
| begin
|
| I := Items.Count;
|
| if I <> 0 then
|
| begin
|
| Items.BeginUpdate;
|
| try
|
| for I := 0 to I - 1 do
|
| if Items[I].Parent = nil then
|
| Items[I].Expand(False);
|
| finally
|
| Items.EndUpdate;
|
| end;
|
| end;
|
| end;
|
| TreeOptions property of acTreeComboBox component.
|