Вниз
Скачать: CL | DM;

Ё-маё! да что ж за фигня такая! ну подскажите же что неверно?   Найти похожие ветки 

← →
lipskiy ©   (2004-09-27 22:43) [0]

Bmp:= TBitmap.Create;
Bmp.PixelFormat:= pf32bit;
Bmp.Transparent:= True;
Bmp.TransparentColor:= clBlack;
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.ImageType:= itMask;
//ImgTools.DrawingStyle:= dsTransparent;
ImgTools.ReplaceMasked(24,Bmp,clBlack);
//ImgTools.Replace(24,Bmp,nil);
Bmp.Free;


Нужно нарисовать прямоугольник цвета Color на иконке 24 в TImageList (ImgTools).
Что бы я ни делал - фон иконки теряет прозрачность и становится белым.
Помогите!


← →
DiamondShark ©   (2004-09-27 23:08) [1]

А может её сначала залить чёрным?


← →
Рыба ©   (2004-09-27 23:20) [2]

>ImgTools.GetBitmap(24,Bmp);

А что это за цифра? Может 32 попробовать? :)


← →
Рыба ©   (2004-09-27 23:22) [3]

А понял, не то.. :))


← →
lipskiy ©   (2004-09-27 23:30) [4]


> А может её сначала залить чёрным?

Чего залить черным?


← →
Рыба ©   (2004-09-28 18:58) [5]

Может дурацкая идея, но попробуй:
Bmp.Canvas.Pixels[0,0] := clBlack;



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.027 c
4-1095111547
Jetus
2004-09-14 01:39
2004.10.17
Набор тел.номера модемом


3-1095844987
Павел
2004-09-22 13:23
2004.10.17
Поле даты в MS SQL на14 символов...


1-1096909779
Werwolf
2004-10-04 21:09
2004.10.17
вопрос по sin и cos


14-1095363542
GROL
2004-09-16 23:39
2004.10.17
Delphi 9 - мертвый ребенок?


4-1094546471
MetalFan
2004-09-07 12:41
2004.10.17
заводской номер CD/Floppy




   Наверх