Цитата:
Сообщение от Shtil
ребята столькнулся со следующей проблемой -
если к примеру прямоугольник закрасить так:
Код:
Canvas.Brush.Color:=clred;
canvas.fillrect(rect); //а после этого кинуть на него
canvas.TextOut(Rect.Left+2,Rect.Top+2,'красивый текст');
то текст получиться как бы прозрачным - не будет затирать потому что цвет "фона" текста совпадает с цветом прямоугольника, а если скажем мне бы хотелось кинуть этот текст на прямоугольник из разноцветных линий или между разноцветными прямоугольниками, можно как-нибудь сделать так, что бы фоновый цвет текста не мешался?? как transparent у TLabel?
|
Код:
Canvas.Brush.Style := bsClear //bsSolid - обратно без прозрачности
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
|