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

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

значки в listview [D7]


Dmitrij_K ©   (2004-05-17 11:21:00) 

Здравствуйте.
У меня возникла такая проблема :
есть listview во списком файлов, для получения значков соответсвующих расширению я использую такую конструкцию

 ImageListHandle := SHGetFileInfo('C:\',
                          0,
                          FileInfo,
                          SizeOf(FileInfo),
                          SHGFI_SYSICONINDEX or SHGFI_SMALLICON);
 SendMessage(FileListView.Handle, LVM_SETIMAGELIST, LVSIL_SMALL, ImageListHandle);

...
...
...

     FillChar(FileInfo, SizeOf(FileInfo), #0);
     Flags := SHGFI_SYSICONINDEX or SHGFI_icon or SHGFI_SMALLICON or SHGFI_USEFILEATTRIBUTES;
     // получаваю описание файла
     SHGetFileInfo(PChar(Ext),
                   FILE_ATTRIBUTE_NORMAL,
                   FileInfo,
                   SizeOf(FileInfo),
                   Flags);
     Result := FileInfo.iIcon;

Так вот проблемав том, как получить значок папки. Научным методом тыка я выяснил что Ext = '.folder', но это работает только в xp. Как сделать в других виндах???
И еще не в xp не находит значок html файла.


[lamer]Barmaglot   (2004-05-17 11:57:00) [1]

>ExtractAssociatedIcon тем что значок как-то не правильно рисуется

Что значит не правильно?


GuAV   (2004-05-17 11:55:00) [2]


> Научным методом тыка я выяснил что Ext = '.folder'

Таким же образом в не-ХР Folder и Directory


Dmitrij_K   (2004-05-17 11:40:00) [3]

ExtractAssociatedIcon тем что значок как-то не правильно рисуется


[lamer]Barmaglot   (2004-05-17 11:35:00) [4]

А чем не устраивает ExtractAssociatedIcon?


Наверх

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