Главная страница
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.052 c
2-1133180011
Oni
2005-11-28 15:13
2005.12.11
Вызов функции из модуля, в TurboPascal e


14-1132336814
Separator
2005-11-18 21:00
2005.12.11
Антивирусники


14-1132564096
stone
2005-11-21 12:08
2005.12.11
Долой кактусы, даешь пирамиды :))


3-1130411344
AlexLines
2005-10-27 15:09
2005.12.11
проблема с escape последовательностью


2-1132688533
HeavyMaster
2005-11-22 22:42
2005.12.11
UpDown