Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.15;
Скачать: 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 вся ветка

Текущий архив: 2002.07.15;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.011 c
1-47588
MAxiMum
2002-06-28 16:49
2002.07.15
Ввод текста на нескольких языках


3-47090
Dim!S
2002-06-21 13:07
2002.07.15
Interbase литература, утилиты


14-47778
lipskiy
2002-06-13 22:55
2002.07.15
Можно ли автоматически засунуть функцию и ее окружение в dll?


1-47534
Leny
2002-06-25 08:34
2002.07.15
Запуск программы из Delphi


6-47660
kool
2002-05-08 03:05
2002.07.15
как обойти сервер в локальной сети?