Вниз
Скачать: 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.023 c
6-1092054959
Filya
2004-08-09 16:35
2004.10.17
Sokcet


3-1095609402
map4ello
2004-09-19 19:56
2004.10.17
Access таблица и RecNo


14-1096128458
Ricks
2004-09-25 20:07
2004.10.17
Помогите с физикой!!!


1-1096613560
klerk
2004-10-01 10:52
2004.10.17
Снова про Excel


9-1085995955
FRick
2004-05-31 13:32
2004.10.17
GLScene как сделать консоль!!




   Наверх