Treeview bestimmten Node finden

[R2009]

Hi,

auf der Datenbankseite kann ich das nicht ändern.
Der komplette Pfad liegt als test1>test2>test3 usw in einem String vor.
Mein Problem besteht nur darin zu dem Knoten zu kommen der bereits vorhanden ist.

Delphi-Quellcode:

var s:tstringlist;j:TTreeNode;n:integer;test:boolean;
begin
  ADOQuery1.open;
  ADOQuery1.first;
  while not (ADOQuery1.eof) do
     begin
       s:=tstringlist.create;
       separate(s,ADOQuery1.FindField('Steuerfeld').asstring,'>'); //s enthält die Strings die in Steuerfeld, getrennt durch > abgelgt waren

       test:=IstDoppelt(TreeView1.items,s.Strings[0]);

       TreeView1.Items.BeginUpdate;
       if test=false then j:=TreeView1.Items.AddChild(nil,s.Strings[0])
       else hier ist mein Problem. Hier muss j dem Knoten zugewiesen werden der schon vorhanden ist.
       TreeView1.Items.EndUpdate;
       for N:=1 to s.Count-1 do
           Begin
             test:=IstDoppelt(TreeView1.items,s.Strings[n]);
             if test=false then j:=TreeView1.Items.AddChild(j,s.Strings[n])
             else hier ist mein Problem. Hier muss j dem Knoten zugewiesen werden der schon vorhanden ist.
           end;
       s.Clear;
       ADOQuery1.next;
     end;
  s.free;

Grüsse
rainer