Delphi-PRAXiS - Delphi Schneller Index in TTreeView

Hallo,

in meiner Application ist es erforderlich, das ich den absoluten Index eines Nodes innerhalb einer TTreeView ermittle.

Die Routine

Delphi-Quellcode:

			    iSelNodePos := -1;

    repeat

     inc(iSelNodePos);

    until TreeView1.Selected = TreeView1.Items.Item[iSelNodePos];

funktioniert zwar sehr gut, aber ist auch sehr langsam....

Versuche ich Alternativen (ich gebe zu, das ist mehr ein Ausprobieren), wie z.B..

Delphi-Quellcode:

iSelNodePos := TreeView1.Items.Item[0].IndexOf(TreeView1.Selected);

oder

Delphi-Quellcode:

iSelNodePos := TreeView1.Selected.Index;

schluckt der Compiler zwar, aber iSelNodePos liefert immer den Wert -1 zurück.

Wie gesagt, ich will den absoluten Index des Kontens innerhalb der NodeList ermitteln, da ich auf Grundlage dieser Information in einem anderen synchronisiert aufgebauten TreeView eine Information schnellstmöglch finden muss...

Hat vielleicht jemand eine passende Idee für mich?

Danke!
Matthias