Главная страница
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.027 c
9-1121833769
Andry
2005-07-20 08:29
2005.12.11
Как улучшить модель


14-1132673206
ArtemESC
2005-11-22 18:26
2005.12.11
Готовность устройства...


4-1129124861
Alex870
2005-10-12 17:47
2005.12.11
Описание службы


2-1132756782
filh
2005-11-23 17:39
2005.12.11
gzip


10-1108936293
GanibalLector
2005-02-21 00:51
2005.12.11
Объектная модель MOffice