Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi TTreeview (https://www.delphipraxis.net/6664-ttreeview.html)

DBman 17. Jul 2003 20:21


TTreeview
 
Hallo :)
Kennt sich irgendjemand näher mit der Klasse TTreeview aus und kann mir sagen , wie man da im Code neue "Knoten" hinzufügen kann?

In der Hilfe finde ich da kein geeignetes Beispiel.
Zur Designtime geht das ja relativ leicht da so einen Baum zu erzeugen.
Aber irgendwie verlangt TTreeview.Items.Add() 2 Parameter :
Einen vom Typ TTreenode (wie ist der denn aufgebaut?) , und dann einen String.

? :firejump: ?

Über Erklärungen wäre ich froh :hello:

Chewie 17. Jul 2003 20:26

Re: TTreeview
 
Add verlangt zunächst einen Zeiger auf einen übergeordneten Knoten. Wenn du einen Knoten auf der obersten Ebene erstellen willst, benutze nil.

Blizzard 17. Jul 2003 21:20

Re: TTreeview
 
das ganze muss dann so in etwa ausschaun

Delphi-Quellcode:
var
parentnode:ttreenode:
begin
 parentnode=treeview.items.addchild(nil,'Knoten1'); //erzeugt einen Knoten direkt unter root
 ttreeview.items.addchild(parentnode,'Konten2'); //erzeugt einen parrentnode untergeodneten knoten
...
mfg
Blizzard

DBman 17. Jul 2003 21:45

Re: TTreeview
 
Hm hat mir schon viel weitergeholfen.
Wo ist jetzt aber nochmal der Unterschied zwischen Add() und AddChild()

? :firejump: ?

DBman 17. Jul 2003 22:00

Re: TTreeview
 
Und wie mache ich das jetzt nochmal wenn ich nen Unter-Unterpunkt machen möchte?
Delphi-Quellcode:
Parentnode:=Treeview1.Items.Add(nil,'PUNKT1');
  Treeview1.Items.AddChild(Parentnode , 'LALALA' );
Also ich möchte jetzt unter LALALA noch einen Unterpunkt einfügen...
? :firejump: ?


Schonmal danke im Vorraus

Christian Seehase 17. Jul 2003 22:12

Re: TTreeview
 
Moin DBMan,

dann merkst Du Dir das Ergebnis von Treeview1.Items.AddChild und benutzt dass beim nächsten AddChild als Parentnode.

AddChild ist ja eine Funktion die den hinzugefügten Knoten zurückliefert.


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:44 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz