Ziel war es eine Baum bis zum Pfad zb. delphi\test\abc zu öffnen
Also, ich habe einen Treeview, und eine StringListe StringList , die die einzelnen Ordner eines Pfades beinhaltet
In dem Fall: StringList[0]=delphi
StringList[1]=test
StringList[2]= abc
Jetzt öffne ich den Baum bis zu diesem Pfad
Delphi-Quellcode:
begin
TreeNode:=Treeview1.TopItem;
i:=0;
while((TreeNode <> nil) and (i < StringList.Count)) do
begin
if (TreeNode.Text=StringList[i]) then
begin
TreeNode.Expand(False);
i:=i+1;
TreeNode:=TreeNode.GetFirstchild;
end
else TreeNode:=TreeNode.GetNextSibling;
end;
end
Ich möchte jetzt das letzte Verzeichnis in dem Fall abc gleich selektieren.
Ich hoffe ich hab dich nicht ganz rausgebracht.
[edit=Sharky]Delphi-Tags gesetzt. Mfg, Sharky[/edit]