Delphi-PRAXiS - Delphi Item in TreeView selektieren

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)

- - Delphi Item in TreeView selektieren (https://www.delphipraxis.net/39553-item-treeview-selektieren.html)

Item in TreeView selektieren

Hallo,

ich habe ein Menü aus einem TreeView erstellt, von welchem aus das Programm beim Anwählen eines Items das TabSheet einer PageControl anspricht.

Nun würde ich's gerne umsetzen, dass beim Programmstart ein Item des TreeViews markiert ist und das dazu gehörige TabSheet angezeigt wird. Ich kann zwar die ActivePage auf das Sheet setzen, bekomme es aber die Markierung im Tree nicht hin.

Nun zur Frage: Wie kann ich die Markierung setzen? Oder besser noch: Meine Lösung ist ja jetzt auf 2 Schritten basierend (ActivePage setzen, TreeView markieren). Geht das auch einfach durch Selektieren des Items?

Danke
Opa

Re: Item in TreeView selektieren

Hai Opa,

einfach mit

Delphi-Quellcode:

TreeView1.Items[2].Selected := True;

Das gewünschte Item selektieren.

Und das Auswählen des Tabs dann im .OnChange des Treeviews:

Delphi-Quellcode:

			procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);

begin

  PageControl1.ActivePageIndex := TreeView1.Selected.Index;

end;