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

Вниз

Иконка   Найти похожие ветки 

 
Avdoshin   (2005-11-20 17:14) [0]

Здравствуйте мастера! Написал програмку, вытаскивающую иконки из приложений, но они меняют глубину цвета на 16 цветов. Как быть?


 
kami ©   (2005-11-20 18:39) [1]

В модуле Graphics.pas (желательно скопировать его в папку своей программы, чтобы не менять глобально) заменить в procedure WriteIcon(Stream: TStream; Icon: HICON; WriteLength: Boolean); :

InternalGetDIBSizes(IconInfo.hbmColor, ColorInfoSize, ColorBitsSize, 16);
на
InternalGetDIBSizes(IconInfo.hbmColor, ColorInfoSize, ColorBitsSize, 65536);
или воспользоваться сторонними компонентами иконок (поищи на Торри)



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

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

Наверх




Память: 0.46 MB
Время: 0.055 c
4-1128418629
NightLord
2005-10-04 13:37
2005.12.11
InternetExplorer


1-1131710014
Альф
2005-11-11 14:53
2005.12.11
Извлечение данных из текстовых файлов


4-1129026072
Alex_Korn
2005-10-11 14:21
2005.12.11
Размер стека


8-1120604738
ronyn
2005-07-06 03:05
2005.12.11
Загрузка файла в проигрыватель при открытии(файла)


2-1133011576
The One
2005-11-26 16:26
2005.12.11
Получение предыдущего значения параметра спомошью RegQueryValueEx