Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

ShellTreeView+ShellListView [D6, Win2k]


avlan ©   (2005-09-16 10:07:00) 

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


ORMADA   (2005-09-16 12:14:00) [1]

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

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


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

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


ormada   (2005-09-16 10:29:00) [3]

Лехко

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;


Наверх

Титульная страница Поиск, карта сайта Написать письмо