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

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

Как изменить иконку в ImageList?


lipskiy ©   (2004-09-23 22:40:00) 

Нужно определенную иконку в ImageList модифицировать (нарисовать на ней что-то иное, в частности - прямоугольник указанного цвета). Все попытки рисования приводят к тому, что сбивается маска, иконка теряет прозрачность и становится на белом фоне.
Делаю так:

Bmp:= TBitmap.Create;
ImgTools.GetBitmap(24,Bmp);
Bmp.Canvas.Brush.Color:= Color;
Rect.Left:= 0;
Rect.Top:= 12;
Rect.Right:= 15;
Rect.Bottom:= 15;
Bmp.Canvas.FillRect(Rect);
ImgTools.ReplaceMasked(24,Bmp,???{вставлял разные цвета});
Bmp.Free;

По всему выходит, что нужно как-то взять маску и вернуть ее обратно, но как взять маску?
А может я вообще неверно делаю?


lipskiy   (2004-09-27 00:35:00) [1]

Так никто больше ничего не подскажет?


lipskiy   (2004-09-25 01:05:00) [2]


> а ты не забываешь, что в Дельфи применяется BGR, а не
> RGB? Поэтому, может и маску составляешь неверно,
> перекопировав из какого-нибудь фотошопа?

Не, это я помню хорошо, младший байт - красный :).
Я не копирую, иконка создана в редакторе иконок (ArtIcons) и в дельфовой проге изначально выглядит нормально, пока я на ней не порисовал. Как только порисую - так маска испорчена.

> имеет метод Draw

Этот метод позволяет наносить содержимое имейджлиста на другие контролы, то есть draw не на иконке, а иконкой по контролу, это не то.

В принципе проблема сводится к одному - как получить маску из ImageList, чтобы при реплейсе вернуть ее обратно. Никаких похожих методов я не нашел...


Piter   (2004-09-25 00:59:00) [3]

lipskiy ©   (25.09.04 0:38) [4]
Но как верно???


а ты не забываешь, что в Дельфи применяется BGR, а не RGB? Поэтому, может и маску составляешь неверно, перекопировав из какого-нибудь фотошопа?


Piter   (2004-09-25 00:58:00) [4]

а черт его знает... я TImageList всегда только в редакторе работал...

Ну покопайся в VCL - есть же место где он картинки грузит? Найди, разберись...

К тому же TCustomImageList имеет метод Draw - может там чего откопать можно?
Ибо если нельзя было рисовать ни иконках - нафига ему такой метод?


lipskiy   (2004-09-25 00:38:00) [5]

Имхо, тоже.
Но как верно???


Piter   (2004-09-25 00:31:00) [6]

Имхо, вставляешь не верно :)


lipskiy   (2004-09-24 22:19:00) [7]

Но у TIcon нет канвы! На ней нельзя рисовать!


Dimaxx   (2004-09-24 00:18:00) [8]

Получить иконку через GetIcon, изменить и вновь назначить ее прежнему индексу через ReplaceIcon. C битмапом тоже, но GetBitmap и Replace.

Удачи!


Наверх

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