Как в ShellTreeView раскрыть дерево нужной папки?

← →
Dinara © (2002-06-30 14:07) [0]

← →
VID © (2002-06-30 19:53) [1]

Честно говоря, не пользуюсь ShellTreeView, но думаю, что:
ShellTreeView1.Directory := <полный_путь_к_каталогу>
или
ShellTreeView1.SetDirectory(<полный_путь_к_каталогу>);

← →
Dinara © (2002-07-02 22:28) [2]

Нет, такого там нету, к сожалению :(

Ребят, неужели никто не знает?

← →
ZyreX © (2002-07-02 22:42) [3]

попробуй так:
ShellTreeView1.Path := "путь к каталогу";

← →
Dinara © (2002-07-03 01:26) [4]

Не получилось :( Как же так? Неужели нет способа?

← →
NailMan © (2002-07-03 02:48) [5]

В пропетитах ShellTreeView1-> ROOT укажи использовать не собственно ROOT из списка, а использовать конкретный путь(по умолчанию будет C:\).

Ну а дальше флаги в руки. Ищменяешь ShellTreeView1.Root на свою
папку и ВУАЛЯ.
(Щелчек пальцами)

Нет, это не то :( Мне нужно не менять Root, а просто раскрыть нужную папку.

← →
valery_f (2002-07-03 11:57) [7]

У меня такое чувство, что борланд специально слегка "недоделал" Shell компоненты, т.к. некоторых фишек (в т.ч. subj) там явно не хватает.

Я это решил следующим образом: лезешь в Delphi6\Demos\ShellControls, находишь ShellCtrls.pas, а в нем ищешь:

procedure TCustomShellTreeView.SetPath(const Value: string);

Нужно заремить строчку "FUpdating := True;" (т.к. следующий за этим SetPathFromID в случае установленного флага FUpdating сразу делает "Exit") и в последующем использовать исправленный вариант.

За корректность решения не ручаюсь, но глюков и утечки хэндлов/памяти не наблюдал.

Как в ShellTreeView раскрыть дерево нужной папки? Найти похожие ветки