[Delphi] Jak v ShellListView vlézt do označeného adresáře

[Tomáš Rajnoha]

Zdravím!
Potřeboval bych prosím poradit, jak uměle (čili ne pomocí Enteru ) vlízt do označeného adresáře, v komponentě TShellListView...
Díky!

[Trebus]

Ja bych to udelal nejak takto:

Kód: Vybrat vše

for i := 0 to ShellListView1.Items.Count - 1 do
   if ShellListView1.Items[i].Selected then
      if ShellListView1.Folders[i].IsFolder then
         Path := ShellListView1.Folders[i].PathName;

ShellTreeView1.Path := Path;

[Tomáš Rajnoha]

Aha, jo, to by šlo. Díky!