VirtualStringView und selbst-referenzierende Ordner Query...

[CenBells]

Hi

Zitat von Gruber_Hans_12345:

...irgendwo mußt du noch die NodeSize definieren (z.B.: FormCreate)
    DeinBaum.NodeDataSize := sizeof(TDeinRecord );

stimmt, musst du aber nicht per code machen, kannst du auch im oi machen. Dort setzt du die eigenschaft NodeDataSize auf 4.

Zitat von Gruber_Hans_12345:

und folgendes

Delphi-Quellcode:

LNode := DeinBaum.AddChild(AParentNode);
    LData := DeinBaum.getNodeData(LNode);
    TObject(LData^) := LRec;

müßte auch mit foglendem funktionieren
LNode := DeinBaum.AddChild(AParentNode, LRec);

Ich habe mich noch zur Zeit der Version 3 in den VST eingearbeitet, und da ging das leider nicht. Gab beim auslesen immer einen fehler. Aber sicherlich ist es einen neuen versuch wert.

Zitat von Gruber_Hans_12345:

ach ja, freigeben mußt du die Klassen auch wieder mal z.B.: im OnFreeNode
TDeineRecord(Sender.GetNodeData(Node)^).Free;

Stimmt Das hab ich vergessen.

Gruß
Ken