VST mit Objekten, Alle Nodes einer Spalte Durchlaufen

[Hawkeye219]

Zwei kleine Fehler fallen mir spontan auf:

Dein Code

Delphi-Quellcode:

VST.BeginUpdate;
Node := VST.getfirst;
while Assigned(Node) do
begin
  Node := VST.Getnodedata(Node);
  TTreeDataClass(Data.FObject).MemUsage:= 'hier der neu zugewiesener wert';
  VST.GetNext(Node);
end;
VST.EndUpdate;

Richtig wäre:

Delphi-Quellcode:

VST.BeginUpdate;
Node := VST.getfirst;
while Assigned(Node) do
begin
  Data := VST.Getnodedata(Node);  // <<<----- Fehler #1
  TTreeDataClass(Data.FObject).MemUsage:= 'hier der neu zugewiesener wert';
  Node := VST.GetNext(Node);  // <<<----- Fehler #2
end;
VST.EndUpdate;

PS: So schön kann Code aussehen, wenn man die Delphi-Tags benutzt.

Gruß Hawkeye