Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Вниз

Системные иконки   Найти похожие ветки 

 
Slaviq   (2001-11-06 17:55) [0]

Как узнать системную иконку файла, (например если файл текстовый то иконка соответственно как на текстовик...)
Пытаюсь TSHGetFileInfo но чегото не получается, только из экзешников :(. Помогите пожалуйста умной мыслью, буду рад любым предложениям.
Ответы желательно слать на мыло (не успеваю на форуме посмотреть)
Всем отозвавшимя ОГРОМНОЕ СПАСИБО!


 
Olgerd   (2001-11-06 19:46) [1]

Попробуй ExtractAssociatedIcon


 
SlaViQ   (2001-11-07 16:23) [2]

Я не понимаю что делать дальше, функция возвращает значение ВОРД, а чего с ним дальше делать, мне нужна готовая картинка БМП или ИКО.
Я просто не дружен с ВинАПИ, больше по БД, помоги пожалуйста разобраться.
Зарание благодарен. Славик.


 
Gluka   (2001-11-08 02:22) [3]

ExtractIcon;

....
....
var
Ico: HICON;
begin
Ico:=ExtractIcon(HInstance,Filename,0 or 1);
//Возвращает HICON (Хендл иконки), FileName-имя файла

Image1.Picture.Icon.Handle:=Ico;
//Image1-твой Image(component)
....
....
end;



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

Форум: "WinAPI";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Наверх









Память: 0.81 MB
Время: 0.036 c
1-22254
alina
2001-12-17 13:32
2002.01.08
Архивация данных


1-22205
Denis Proshkin
2001-12-15 12:46
2002.01.08
QReport - много данных


4-22505
Delphi5.01
2001-11-07 20:14
2002.01.08
Проблемма с BitMap-ом


1-22108
Michael
2001-12-19 19:10
2002.01.08
Протяженная печать на матричном принтере


6-22302
Игорь
2001-10-11 20:10
2002.01.08
Сокеты в Delphi





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский