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

Вниз

Как перебирая файлы и папки директории узнать...   Найти похожие ветки 

 
Pump   (2003-06-10 16:09) [0]

какому файлу или папке, какая картинка соответствует в Windows и как ее получить? Например, рисунок папки для папки, а для файла, то с чем он ассоциирован?


 
Юрий Федоров ©   (2003-06-10 16:17) [1]

SHGetFileInfo


 
Pump   (2003-06-10 16:40) [2]

Спасибо! Я так понимаю что они уже в памяти, можно-ли получить их индех (handle)?


 
Юрий Федоров ©   (2003-06-10 16:52) [3]

function GetShellFileIcon(const FileName : string) : HICON;
var SYSIL : THandle;
SFI : TSHFileInfo;
begin
Result:=0;
FillChar(SFI, SizeOf(SFI), 0);
SysIL := SHGetFileInfo(PChar(FileName), 0, SFI, SizeOf(SFI), SHGFI_SYSICONINDEX or SHGFI_SMALLICON);
if SysIL <> 0
then Result:=ImageList_GetIcon(SysIL, SFI.iIcon, 0)
else RaiseLastOSError;

end;


 
Pump   (2003-06-10 17:00) [4]

Вот спасибо! То что нужно!!!!



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

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

Наверх




Память: 0.47 MB
Время: 0.021 c
1-84394
-=GaLaN=-
2003-06-09 13:37
2003.06.26
Странные ярлыки не запускаются через shellexecute


14-84669
Jurd
2003-06-08 17:03
2003.06.26
Где взять компоненту?


14-84657
qq
2003-06-10 09:52
2003.06.26
DelphiX


3-83861
Ditrix
2003-06-02 11:28
2003.06.26
установка фильтра в IBQuery


8-84470
handra
2003-03-04 17:08
2003.06.26
коррекция изображения (яркость, контрастность, цвет)