Treeview: Pfad öffnen

[valon]

Hallo , brauche eure Hilfe!

Ich möchte einen Treeview bis zu dem Pfad zb. test\ordner\abc öffnen.Den Pfad hab ich zerstückelt
und jedes Verzeichnis in eine StringListe eingefügt.

Ich zeige euch mal den Code der aber nicht richtig funz.

Wenn ich einen TreeNode erzeuge, will er bei TreeNode.create einen Owner haben , ich weiss nicht was ich da angeben soll.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  i : Integer;          //zähler
TreeNode:TTreeNode;
begin
  TreeNode:=TTreeNode.create(????????);

  TreeNode:=Treeview1.TopItem;
  i:=0;

  while((Treeview1.TreeNode <> nil) and (i < StringList.Count)) do    //in stringList sind die Verzeichnisse drin
  begin
    if (Treeview1.TreeNode.Text=StringList[i]) then
      begin
        Treeview1.TreeNode.Expand(False);
        i:=i+1;
        Treeview1.TreeNode:=Treeview1.TreeNode.GetFirstchild;
      end
    else Treeview1.TreeNode:=Treeview1.TreeNode.GetNextSibling;

  end;

könnte das so funktionieren?
danke

[edit=Sharky]Delphi-Tags gesetzt. Mfg, Sharky[/edit]

[Muetze1]

Moin!

1. Was ist TreeView1.TreeNode ??
2. Wieso baust du das nicht rekursiv auf?
3. Ein Beispiel der rekursiv einen TreeView durchsucht, musste nur ein wenig abändern: guckst du hier

MfG
Muetze1