VirtualTreeView: Kompletten Subtree kopieren?

[JPSelter]

Bietet VTV eine Möglichkeit einen kompletten Subtree zu kopieren und an einen anderen Knoten anzuhängen? Oder muss ich das zu Fuss programmieren. Das dürfte einiges an Aufwand sein fürchte ich.

[generic]

vst.copyto(...); biete sich da an.

[JPSelter]

Ah, sehr gut, hatte schon Angst, man müsste das alles selber machen. Geil dieses VTV

[JPSelter]

Bekomme leider eine Exception mit dem Hinweis, dass ich nicht genügend RAM hätte... RAM-Verbrauch wächst dabei auf 1,3GB... ist aber unwichtig, die Exception selbst ist das Problem, nicht der RAM.

Also, die Zeile lautet nun

Form1.VST1.CopyTo(Node,currentNode,amInsertAfter,true); Node ist der Quell-Knoten mit all seinen Children, currentNode der gerade neu eingehängte und der Ziel-Knoten, der all die anderen Children bekommen soll, das InsertAfter sollte stimmen, und true weil ich nur die Children des Quell-Knotens haben will. Aber wo ist nun der Fehler? Im Debugger sehe ich, dass beide Nodes auf einen Speicherbereich zeigen, also definiert sind.

[generic]

vieleicht eine endlos schleife in der sich copyto verfängt.
kannst du ausschliessen das die "zu kopierenden" wieder vom selben prozess kopiert werden?

Code:

1
+-2
  +-ziel

knoten 1 soll nach ziel kopiert werden -> geht nicht weil du endlos viele knoten kopieren würdest.

[JPSelter]

Bin grad wieder von der Arbeit zu Hause, kanns nun nicht genau verifizieren. Quelle und Ziel sollten eigentlich Schwesterknoten sein, ich muss am Mo nochmal schauen, aber es sah heute korrekt aus. Aber stimmt, eine Endlosschleife würde diesen Speicherüberlauf erklären. Danke für den Tip!

[JPSelter]

So, da bin ich wieder. Es ist etwas seltsam mit diesem Fehler. Also erstmal skizziere ich die Baumstruktur:

Delphi-Quellcode:

+ A (Quelle)
  - B
  - C
- D
+ E
  - F
- G (Ziel, hier sollen alle Children von A dran)

Ich will einen neuen Knoten einfügen. Zum Zeitpunkt meines CopyTo hängt der neue Knoten G bereits im Baum. Dann folgt

Form1.VST1.CopyTo(Node,currentNode,amInsertAfter,false); Node ist der Quellknoten (geprüft) und currentNode der Zielknoten (geprüft). Trotzdem kommt die Fehlermeldung, als wenn, wie schon vermutet, irgendwo eine Endlosschleife läuft. Aber die kann ich nirgends sehen.
Dann habe ich mal aus true ein false gemacht, also ChildrenOnly disabled. Das klappt, aber mit seltsamen Endergebnis:

Delphi-Quellcode:

+ A (Quelle)
  - B
  - C
- D
+ E
  - F
+ A (Kopie der Quelle)
  - B
  - C
+ G (eigentliches Ziel)

Er hat zuerst Knoten G korrekt als Ziel erkannt, macht aber eine Kopie von A und hängt diesen an nil an. Aber wieso? Jetzt verstehe ich gar nichts mehr

[Hawkeye219]

Hallo JPSelter

Zitat von TreeView-Hilfe:

Code:

TVTNodeAttachMode = (
    amNoWhere,        // just for simplified tests, means to ignore the Add/Insert command
    amInsertBefore,   // insert node just before destination (as sibling of destination)
    amInsertAfter,    // insert node just after destionation (as sibling of destination)
    amAddChildFirst,  // add node as first child of destination
    amAddChildLast    // add node as last child of destination
  );

Versuche es einmal mit dem Modus amAddChildLast. Wenn du nur die Kind-Knoten kopieren möchtest, mußt du dies eventuell in einer Schleife tun.

Gruß Hawkeye

[JPSelter]

Danke Hawkeye! Dein Tip war nicht die Lösung, aber Dein Posting hat mir das Problem direkt vor Augen geführt: Mein amInsertAfter hängt den Quellknoten nicht an mein Target an, sondern versucht einen neuen Knoten NEBEN meinem Zielknoten zu erstellen. Und wenn ChildrenOnly dann true ist, hat er nichts, wohin er es hängen könnte Habe nun amAddChildFirst benutzt und das klingt jetzt auch logisch