Показать сообщение отдельно
  #2  
Старый 24.02.2010, 07:10
Аватар для AleD
AleD AleD вне форума
Активный
 
Регистрация: 21.02.2009
Адрес: г.Краснокаменск
Сообщения: 383
Репутация: 91
По умолчанию

Цитата:
Сообщение от 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;
Ответить с цитированием