Иконка
Avdoshin © (2005-11-20 17:14:00)
Здравствуйте мастера! Написал програмку, вытаскивающую иконки
из приложений, но они меняют глубину цвета на 16 цветов. Как
быть?
kami (2005-11-20 18:39:00) [1]
В модуле Graphics.pas (желательно скопировать его в папку
своей программы, чтобы не менять глобально) заменить в procedure
WriteIcon(Stream: TStream; Icon: HICON; WriteLength:
Boolean);:
InternalGetDIBSizes(IconInfo.hbmColor, ColorInfoSize,
ColorBitsSize,
16);
на
InternalGetDIBSizes(IconInfo.hbmColor, ColorInfoSize,
ColorBitsSize,
65536);
или воспользоваться сторонними компонентами иконок (поищи на
Торри)
Наверх 
ЧАТ |
Орешник |
|
