Главная страница
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.016 c
7-84793
Alex000
2003-04-15 08:52
2003.06.26
Считывание серийного номера


3-83891
Alexander Tarasov
2003-06-02 14:42
2003.06.26
Не получается в TADOStoredProc работать с MS SQL 2000 с DateTime


14-84733
Soft
2003-06-04 11:27
2003.06.26
О


1-84358
Александр-И
2003-06-16 17:09
2003.06.26
LabeledEdit + UpDown


6-84487
Kedis
2003-04-22 09:05
2003.06.26
Outlook Express