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

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

Получение картинки из ImageList для кнопки SpeedButton [D7, WinXP]


Darvin ©   (2006-04-18 11:07:00) 

Здравствуйте.
Мне нужно в рантайме перегружать картинки, находящиеся на SpeedButton и брать их из ImageList
Объявления:
 ilSave : TImageList;
 btnRecord : TSpeedButton;
 myBitmap : TBitmap;

Делаю след. образом:
     ilSave.GetBitmap ( 1, myBitmap );
     btnRecord.Glyph := myBitmap;
и при этом картинка на кнопке перегружается, но области "прозрачного" цвета становятся белыми, хотя на реальной картинке они не белые.

Если делаю так:
     ilSave.GetBitmap ( 1, btnRecord.Glyph );
то картинка вообще не перегружается.

Что я не так делаю?


Darvin   (2006-04-19 15:11:00) [1]

Победа!!! Победила следующая комбинация:
var
 Rect : TRect;
begin
 Rect.Left := 0; Rect.Top := 0;
 Rect.Right := 44; Rect.Bottom := 22;
 myBitmap.Canvas.FillRect ( Rect );
 ilSave.GetBitmap ( 1, myBitmap );
 btnRecord.Glyph := imgRec.Picture.Bitmap;


Darvin   (2006-04-19 13:33:00) [2]

игрался, не помогает


проходил мимо   (2006-04-19 12:24:00) [3]

Стоит поиграться со свойствами TBitmap.Transparent, TBitmap.TransparentColor, TSpeedButton.Transparent. Должно помочь.


Darvin   (2006-04-19 10:41:00) [4]

Интересно еще то, что при переключении в режим 800х600 белое поле не появляется.


Наверх

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