Hallo,

habe ein Problem mit TTreeView: Wie implementiere ich drag&drop, so das man markierte Knoten an andere Baumknoten anhängen kann? Wie man Ereignis abfragt und die markierten Knoten ermittelt weiss ich alles, aber wie konkret kopiere (weiss ich auch noch) ich die Knoten INKLUSIVE ihrer Child-Knoten (ab da weiss ich jetzt nicht weiter) an die neue Stelle? Und, vor allem, noch komplizierter, wie lösche ich die urpsrünglichen Knoten nach dem Verschiebevorgang aus dem Baum, und zwar wieder INKLUSIVE der child-nodes?

Ich vermute ja fast das es da eine vorgefertigte Trivial-Lösung für gibt, die ich bloss nicht finde, und die Delphi-Hilfe hiflt einem bei TreeView auch nicht wirklich weiter.. wäre über Erklärungen sehr dankbar.

Grüße
Jan

Hallo Jan und Willkommen hier im Forum,

Du hast geschrieben das Du die Node incl. der Childe-Node an die neue Position kopieren und anschließend bei der alten Position löschen willst. Ich würde da anders dran gehen: Versuch doch einfach mal bei der Node welche Du verschieben möchtest die Eingeschaft Owner zu ändern. Also einfach auf das neue Ziel-Node verweisen. Dadurch sollte sich die Node incl. der Child-Nodes verschoben haben ohne das Du es kopieren und löschen musst!

Gruß
TINO

Hallo,

vielen Dank, dachte erst, ach SO geht das, aber leider.. sagt mir Delphi zu meinem Versuch, das so zu machen, das einer read-only-Eigenschaft kein Wert zugewiesen werden kann. Habe allerdings auch irgendwie nicht auf der Reihe gehabt das das eigentlich eine clx-Anwendung ist, verhält sich der TreeView da anders? oder bin ich einfach zu doof dazu?

Gruß und Dank,
Jan

Idee ist aber nicht verkehrt!

Statt der Eigenschaft Owner etwas zuzuweisen musst du lediglich die Methode MoveTo Benutzen:


Der Übergibst du einfach den neuen Parent Node.

Gruss Frederik

Juhu, es funktioniert!

Allerbesten Dank,
Jan

Natürlich, sorry, hab es übersehen mit der Read-Only-Eigenschaft. Die MoveTo-Methode ist natürlich richtig

Gruß
TINO