VirtualStringTree nodes und childs

[berndn]

Zitat von SauberMann:

vst.getfirst.getnext grüße

Danke SauberMann

Nun zurück zu vst. Mit vst.getfirst komme ich an den ersten Knoten. Bei meinen Tests mit getnext und getnextsibling habe ich herausgefunden das ich mich scheinbar nur mit getnextsibling an den nächsten Hauptknoten vorarbeiten kann.

Delphi-Quellcode:

procedure TForm2.Button3Click(Sender: TObject);
var
  daten : TOAutos;
  gruppe : TOAutoMarken;
  node: PVirtualNode;
begin
  node:=vst.GetFirst;
  showmessage('Anzahl Kind node nach GETFIRST: ' + IntToStr(vst.ChildCount[node]));
  node:=vst.GetNext(node);
  showmessage('Anzahl Kind node nach GETNEXT: ' + IntToStr(vst.ChildCount[node]));
  node:=vst.GetFirst;
  showmessage('Anzahl Kind node nach GETFIRST: ' + IntToStr(vst.ChildCount[node]));
  node:=vst.GetNextSibling(node);
  showmessage('Anzahl Kind node nach GETNextSibling: ' + IntToStr(vst.ChildCount[node]));
end;

Auf den ersten Blick sieht die Navigation innerhalb der Struktur mühsam aus