Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

Dinara © (2002-06-30 14:07:00)
Как в ShellTreeView раскрыть дерево нужной папки?

valery_f (2002-07-03 11:57:00) [1]
У меня такое чувство, что борланд специально слегка "недоделал" Shell компоненты, т.к. некоторых фишек (в т.ч. subj) там явно не хватает.

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

procedure TCustomShellTreeView.SetPath(const Value: string);

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

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

Dinara (2002-07-03 09:21:00) [2]
Нет, это не то :( Мне нужно не менять Root, а просто раскрыть нужную папку.

NailMan (2002-07-03 02:48:00) [3]
В пропетитах ShellTreeView1-> ROOT укажи использовать не собственно ROOT из списка, а использовать конкретный путь(по умолчанию будет C:\).

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

Dinara (2002-07-03 01:26:00) [4]
Не получилось :( Как же так? Неужели нет способа?

ZyreX (2002-07-02 22:42:00) [5]
попробуй так:
ShellTreeView1.Path := "путь к каталогу";

Dinara (2002-07-02 22:28:00) [6]
Нет, такого там нету, к сожалению :(

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

VID (2002-06-30 19:53:00) [7]
Честно говоря, не пользуюсь ShellTreeView, но думаю, что:
ShellTreeView1.Directory := <полный_путь_к_каталогу>
или
ShellTreeView1.SetDirectory(<полный_путь_к_каталогу>);

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »