Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.09;
Скачать: CL | DM;

Вниз

ShellTreeView+ShellListView   Найти похожие ветки 

 
avlan   (2005-09-16 10:07) [0]

Подскажите, пожалуйста, как можно использовать связку компонентов ShellTreeView+ShellListView для показа в ShellListView файлов заданного типа.
Связка DirectoryListBox+FilterComboBox+FileListBox из вкладки Win3.1 позволяет получить фильтрованный список файлов, но не подходит.


 
ormada ©   (2005-09-16 10:29) [1]

Лехко

procedure TMainForm.ShellTreeViewAddFolder(Sender: TObject;
 AFolder: TShellFolder; var CanAdd: Boolean);
begin
 if not AFolder.IsFolder then
   if (LowerCase(ExtractFileExt(AFolder.PathName)) <> JpegExt) then
     CanAdd := false;
end;


 
avlan   (2005-09-16 10:39) [2]

А если надо отфильтовать несколько типов файлов (напр., графические - bmp, jpg, gif, png и т.д.?


 
ORMADA ©   (2005-09-16 12:14) [3]

2 avlan не тупи!
вставь проверку на нужные типы файлов

if ((LowerCase(ExtractFileExt(AFolder.PathName)) =".txt")
or ((LowerCase(ExtractFileExt(AFolder.PathName)) =".doc")



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

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

Наверх




Память: 0.47 MB
Время: 0.063 c
14-1127069788
Fl@sh
2005-09-18 22:56
2005.10.09
Жена+Інтернет+знакомство


2-1124950087
magnus
2005-08-25 10:08
2005.10.09
опции проекта


1-1126791640
bokuto
2005-09-15 17:40
2005.10.09
Запуск архиватора


2-1125052372
oradb
2005-08-26 14:32
2005.10.09
Привести TObject к integer


14-1126678248
Ega23
2005-09-14 10:10
2005.10.09
Wanted!!! "Уездный город N"