VST betsimmten Node ansprechen

[youuu]

Hi,

Ich möchte gerne die Nodes in einer Schleife ansprechen, jedoch weiß ich nur wie ich den 1. und den 2. Node anspreche.

GetFirst 1. Node
GetFirst.NextSibling 2. Node

jedoch wie mache ich es per Schleife?

Delphi-Quellcode:

For i := 0 to Vst.RootNodeCount -1 do
Begin
  // ??
End;

[jbg]

Du musst die Schleife zu einer while-Schleife umfunktionieren, dann geht das ziemlich einfach, da du dich von Knoten zu Knoten hangeln kannst

Delphi-Quellcode:

Node := Vst.GetFirstNode;
while Node <> nil do
begin
  // ... Mit Node etwas anstellen ...

  Node := Vst.GetNextSibling(Node);
end;

[youuu]

Zitat:

Zitat von jbg

Du musst die Schleife zu einer while-Schleife umfunktionieren, dann geht das ziemlich einfach, da du dich von Knoten zu Knoten hangeln kannst

Delphi-Quellcode:

Node := Vst.GetFirstNode;
while Node <> nil do
begin
  // ... Mit Node etwas anstellen ...

  Node := Vst.GetNextSibling(Node);
end;

Zitat:

Zitat von jbg

Du musst die Schleife zu einer while-Schleife umfunktionieren, dann geht das ziemlich einfach, da du dich von Knoten zu Knoten hangeln kannst

Delphi-Quellcode:

Node := Vst.GetFirstNode;
while Node <> nil do
begin
  // ... Mit Node etwas anstellen ...

  Node := Vst.GetNextSibling(Node);
end;

klappt soweit nur wenn Node = "nicht existiert" knallt es bei mir und IDE schreit Zugriffsverletzung.

Edit:

Habe es nun so gelöst.

Delphi-Quellcode:

while Node <> nil do
begin
  if VstEmpfaengerGruppe.GetNext(Node) = nil then
    Exit;

  Node := Vst.GetNextSibling(Node);
end;

[jbg]

Zitat:

Zitat von youuu

klappt soweit nur wenn Node = "nicht existiert" knallt es bei mir und IDE schreit Zugriffsverletzung.

Wie meinst du das? Wenn mein obiger Code nicht funktionieren würde, dann hätten einige Kunden ein ziemlich großes Problem, und das haben sie definitiv nicht, da der Code schon seit Jahren einwandfrei funktioniert. Wäre auch schlimm wenn GetNextSibling fehlerhaft wäre.

[youuu]

So war das nicht gemeint, natürlich funktioniert er nur es tritt beim letzten Aufruf eine Exception mit Zugriffsverletzung auf.

[jbg]

Zitat:

Zitat von youuu

es tritt beim letzten Aufruf eine Exception mit Zugriffsverletzung auf.

Welche VirtualTreeView Version hast du denn? Oder löscht du oder fügst du neue Knoten innerhalb der Schleife hinzu?

[youuu]

Zitat:

Zitat von jbg

Zitat:

Zitat von youuu

es tritt beim letzten Aufruf eine Exception mit Zugriffsverletzung auf.

Welche VirtualTreeView Version hast du denn? Oder löscht du oder fügst du neue Knoten innerhalb der Schleife hinzu?

Nein ich füge keine hinzu, allerdings ignoriere ich den 1. Node

Delphi-Quellcode:

while Node <> nil do
begin
  if VstEmpfaengerGruppe.GetNext(Node) = nil then
    Exit;

  Node := Vst.GetNextSibling(Node);
end;

so geht es allerdings.

[uligerhardt]

Du kannst auch mal IterateSubTree (oder so ähnlich?) ausprobieren.

[generic]

getNext() und GetNextSibling() sind unterschiedliche Funktionen mit unterschiedlichen Zweck!
Mir leuchtet auch nicht ein was dein Konstrukt bezweckt.
Der Programmfehler kommt eher durch einen Programmfehler und nicht durch den VST.

Das Beispiel von jbg ist richtig und funktioniert.