diff options
Diffstat (limited to 'examples/gui/treeviewtest')
-rw-r--r-- | examples/gui/treeviewtest/treeviewtest.lpr | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/examples/gui/treeviewtest/treeviewtest.lpr b/examples/gui/treeviewtest/treeviewtest.lpr index 7db4aafe..45c18079 100644 --- a/examples/gui/treeviewtest/treeviewtest.lpr +++ b/examples/gui/treeviewtest/treeviewtest.lpr @@ -32,12 +32,18 @@ begin TV := TfpgTreeView.Create(self); TV.SetPosition(8, 8, 250, 180); - TV.ShowColumns := False; + TV.Align := alClient; + TV.ShowColumns := True; n := TV.RootNode.AppendText('Node 1'); n.AppendText('Node 1.1'); + n.AppendText('Node 1.2'); n := TV.RootNode.AppendText('Node 2'); n.AppendText('Node 2.1'); + n := n.AppendText('Node 2.2'); + n.AppendText('Node 2.2.1'); + TV.RootNode.FirstSubNode.Next.Collapse; TV.RootNode.AppendText('Node 3'); + TV.Selection := n; end; |