VirtualStringTree: wie kann ich nur Children von einem Parent anzeigen lassen?

[ernschd]

Hmm, wenn ich das so versuche, werden seltsamerweise die Nodes 1-5 nicht angezeigt, alle anderen schon. GetText gibt nur die Daten aus.

Delphi-Quellcode:

procedure zeigeNode(Index: Integer);
var Node : PVirtualNode;
begin
    Node := VST.GetFirst();
    while (Node.Index <> Index) do begin
        VST.IsVisible[Node] := False;
        Node := VST.GetNext(Node);
    end;
    VST.IsVisible[Node] := True;
end;

Nachtrag:
Wenn ich in der Methode, in der ich die Daten in den VST lade, die untere Schleife zum Erstellen und Befüllen der Child-Nodes weglasse, kann ich mit zeigeNode problemlos durchblättern.

Delphi-Quellcode:

Node := VST.AddChild(nil);              // Node erstellen
VST.IsVisible[Node] := False;           // ausblenden
Data := VST.GetNodeData(Node);
Data^.Nummer := WO_N^.Nummer;

while G <> NIL do begin   
    fChild := VST.AddChild(Node);       // Child-Node erstellen
    GerData := VST.GetNodeData(fChild); // Daten in Node eintragen
    GerData^.Text := G^.Text;           // Einträge kopieren
    G := G^.GNext;                      // nächster Eintrag
end;