Главная страница
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.024 c
3-1125429663
stals
2005-08-30 23:21
2005.10.09
Народ! Срочно нужен пример!!!


3-1124381261
White_
2005-08-18 20:07
2005.10.09
Как копировать экземпляр TIBQuery?


2-1124832965
AIms
2005-08-24 01:36
2005.10.09
Почему возникают тормоза при переходе от массива к такой схеме ?


14-1126693482
Булат Шакиров
2005-09-14 14:24
2005.10.09
Россия снизила производство водки на 9%


6-1118663749
Новичек
2005-06-13 15:55
2005.10.09
Странная ошибка сокета 10035.