Главная страница
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.042 c
4-1128570737
Angel[Saint]
2005-10-06 07:52
2005.12.11
Сервис и RegisterHotKey


9-1121833769
Andry
2005-07-20 08:29
2005.12.11
Как улучшить модель


6-1125308417
Irinka
2005-08-29 13:40
2005.12.11
Пересылка и получение файлов с помощью сокетов


4-1128601644
AngelFire
2005-10-06 16:27
2005.12.11
Перехват ввода


1-1131962564
Дмитрий_05
2005-11-14 13:02
2005.12.11
Окно программы не высвечивается в таскбаре