Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.03.2009, 13:14   #1
m9ss
 
Регистрация: 14.12.2008
Сообщений: 9
По умолчанию ShellTreeView открытие файлов по dbclick

Подскажите как сделать чтобы в ShellTreeView по дабл клику на файл он открывался (ShellExecute).
m9ss вне форума Ответить с цитированием
Старый 03.03.2009, 13:50   #2
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

В обработчике даблклика вызвать на выполнение файл, имя которого выделено...
Это тот же TreeView, и все свойства и методы те же.
Или вы про волшебную клавищу F1 не в курсе? Нажмите ее, предварительно выделив мышкой интересующий объект, и вам все подробно о нем расскажут...
mihali4 вне форума Ответить с цитированием
Старый 03.03.2009, 17:19   #3
m9ss
 
Регистрация: 14.12.2008
Сообщений: 9
По умолчанию

это все понятно,но я так и не нашел способ отличить папку от файла, мне не нужно чтобы он открывал папки при дабл клике ? я подумал что такое уже наверняка делали и хотел взглянуть на пример.
m9ss вне форума Ответить с цитированием
Старый 03.03.2009, 18:45   #4
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Цитата:
не нашел способ отличить папку от файла
Можно при заполнении ShellTreeView прописывать в Items.Data признак - файл или каталог. Тогда вам будет гораздо проще...
Или по итемсу находить этот объект и смотреть атрибут faDirectory.

Последний раз редактировалось mihali4; 04.03.2009 в 00:57.
mihali4 вне форума Ответить с цитированием
Старый 03.03.2009, 18:52   #5
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

Можете сделать так:
Код:
Uses
   ShellApi;
Procedure TForm1.ShellTreeView1DblClick(Sender: TObject);
Begin
ShellExecute(Application.Handle,'Open',PChar(ShellTreeView1.Path),Nil,Nil,SW_SHOWDEFAULT);
End;
А если вам не надо что бы открывались папки, а только файлы, то прежде чем открыть проверяйте что выделено, папка или файл.
Всегда рад помочь!
Terran вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Открытие файлов limon Помощь студентам 4 11.09.2008 09:06
открытие нескольких файлов valyan Общие вопросы Delphi 10 17.07.2008 20:27
открытие файлов Ensoph Общие вопросы Delphi 5 31.03.2008 20:45
Подскажите как сделать открытие файла на dbclick Altera Общие вопросы Delphi 3 30.01.2008 15:02
Открытие файлов *.txt Bill Gates Общие вопросы Delphi 3 28.11.2007 22:44