Скачать: CL | DM;

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

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

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

---

← →
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 на свою
папку и ВУАЛЯ.
(Щелчек пальцами)

---

← →
Dinara ©   (2002-07-03 09:21) [6]

Нет, это не то :( Мне нужно не менять 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") и в последующем использовать исправленный вариант.

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.008 c