Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Есть Handle иконки, как мне её сохранить на диск, желательно с


Alexander ©   (2003-02-14 16:44:00) 

сохранением количества цветов (без сохранения я и через TIcon могу)


Набережных С.   (2003-02-15 22:32:00) [1]

Alexander ©

Ты попробовал?


Alexander   (2003-02-15 21:47:00) [2]

Это понятно, но тогда вопрос такой: как можно сохранять иконку именно с нужным количеством цветов? То есть если у неё 16, то сохранять 16-ти цветную, если 256, то 256-ти цветную и т.д.


Набережных С.   (2003-02-15 18:43:00) [3]

Кстати, я пробовал с 256-цветными - сохраняет как 256-цветные


Набережных С.   (2003-02-15 18:41:00) [4]

>Ricks © (15.02.03 15:31)
>Только не 1000 а 0 или 1 shl 32.

Это почему?


Ricks   (2003-02-15 15:31:00) [5]

Только не 1000 а 0 или 1 shl 32. Но тогда ВСЕ значки будут сохраняться в 32-х битном цвете


Набережных С.   (2003-02-14 20:29:00) [6]

Попробй сделать так:
1) Скопируй в папку проекта модуль Graphics.
2) Найди в нем процедуру WriteIcon.
3) В двух строчках:
InternalGetDIBSizes(IconInfo.hbmColor, ColorInfoSize, ColorBitsSize, 16);
InternalGetDIB(IconInfo.hbmColor, 0, ColorInfo^, ColorBits^, 16);
измени последний параметр(16) на число больше 256, например, 1000.
4) Попробуй сохранить через TIcon.
5) О результатах доложить - очень интересно, а тестировать лень:)


Наверх

Титульная страница Поиск, карта сайта Написать письмо