Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.18;
Скачать: [xml.tar.bz2];




Вниз

Работа с TShellListView 


softland   (2002-03-02 12:38) [0]

Имеется стандартный компонент TShellListView, но
по нему нет раздела во встроенном хелпе.
Вопрос как на нем реализовать свой браузер файловой системы.
Как программно указать католог который надо откыть, скажем тот с которым завершили предыдущий сеанс работы.
Как сделать, чтобы выводилось системное контексное меню при клике на пустом
месте, а не только на файле.
Как сделать переход на один уровень выше по дереву каталогов.



McSimm   (2002-03-03 13:31) [1]


> как на нем реализовать свой браузер файловой системы.

Ложится на форму 3 компонента:
TShellTreeView; TShellComboBox; TShellListView;
Соединяются друг с другом через соответствующие property


> Как сделать, чтобы выводилось системное контексное меню
> при клике на пустом
> месте, а не только на файле.


Указать свой Popup в свойстве ShellListView.PopupMenu



softland   (2002-03-03 22:14) [2]

Браузер конечно получиться, и такой у меня есть, но это не решает проблемы перехода в указанный программой каталог.
Кроме того пользователей приучили не пользоваться TShellTreeView
а только кнопками Вперет/Назад/На уровень вверх.
Вероятно необходимо оперировать свойством Root, пришлось делать функцию PrevPath - которая укорачивает строку пути к фолдеру на один уровень, по символу "\". :)

2. Своё меню как корове седло, ведь для items уже определено системное меню, очень удобное и к нему пользователь привык, а к моему нет.

Всё это напоминает изобретение велосипеда по n-му разу.



softland   (2002-03-04 02:39) [3]

Програмный переход в заданный каталог компоненты TShellListView
но через Ж()?;

cbShell.DroppedDown := true;
cbShell.Path := "x:\etc\cd";
cbShell.DroppedDown := false;
slvFiles.SetFocus();

где cbShell : TShellComboBox;
а slvFiles : TShellListView;
Переход на один уровень выше по дереву каталогов:

cbShell.DroppedDown := true;
cbShell.ItemIndex := cbShell.ItemIndex -1;
cbShell.DroppedDown := false;
slvFiles.SetFocus();




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.18;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.014 c
4-57565           Delphi5.01            2002-01-19 20:56  2002.03.18  
Почему форма разных размеров в Win98 и Win95.


14-57524          Wonder                2002-02-01 16:44  2002.03.18  
Отвлечемся? :)


3-57308           vopros                2002-02-19 13:31  2002.03.18  
Помогите составить запрос:


3-57316           boogier               2002-02-19 12:25  2002.03.18  
Можно ли при помощи выполнить запрос асинхронно?


6-57488           Pantero               2001-12-29 22:53  2002.03.18  
Послать мыла наименшими ресурсами в Дельфи