Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.09.16;
Скачать: CL | DM;

Вниз

Label на TImage   Найти похожие ветки 

 
tim_ka   (2007-08-23 13:36) [0]

на форме лежит Image1
в нем отрисовываются объекты класса TBitmap. обновление картинки каждые 10 мс.

почему когда я делаю

Image1.Picture.Bitmap.Canvas.TextOut(25, 25, "Test!");
у меня пропадает картинка в Image1 ?

и как лучше сделать отрисовку текста в данном случае?
я клал Label поверх Image, потом что бы не мерцало устанавливал

Form4.DoubleBuffered:=true;

но DoubleBuffered сильно грузит память и все начинает тормозить...

спасибо!


 
Leonid Troyanovsky ©   (2007-08-23 13:42) [1]


> tim_ka   (23.08.07 13:36)  

> и как лучше сделать отрисовку текста в данном случае?

Выводить текст на те самые объекты класса TBitmap.

--
Regards, LVT.


 
wp2 ©   (2007-08-23 13:46) [2]

почему когда я делаю

Image1.Picture.Bitmap.Canvas.TextOut(25, 25, "Test!");
у меня пропадает картинка в Image1 ?


должно работать! глюк


 
tim_ka   (2007-08-23 13:47) [3]


> > и как лучше сделать отрисовку текста в данном случае?
> Выводить текст на те самые объекты класса TBitmap.


получилось,

 fon.Canvas.TextOut(25, 25, "Test!");

а где сделать для этого текста transparent ?


 
wp2 ©   (2007-08-23 13:55) [4]

что за фон?

А зачем тебе прозрачность?


 
Leonid Troyanovsky ©   (2007-08-23 14:00) [5]


> tim_ka   (23.08.07 13:47) [3]

>  fon.Canvas.TextOut(25, 25, "Test!");

 Canvas.Brush.Style := bsClear;
 Canvas.TextOut(

--
Regards, LVT.


 
tim_ka   (2007-08-23 14:09) [6]


> > tim_ka   (23.08.07 13:47) [3] >  fon.Canvas.TextOut(25,
>  25, "Test!");  Canvas.Brush.Style := bsClear;  Canvas.TextOut(


все получилось. Спасибо !!!!



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

Текущий архив: 2007.09.16;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.031 c
15-1186125405
palva
2007-08-03 11:16
2007.09.16
хороший ученый не может быть верующим человеком


2-1187857116
newbdelphi
2007-08-23 12:18
2007.09.16
В каких случаях как лучше писать?


2-1187515795
RakoT
2007-08-19 13:29
2007.09.16
FileExists


3-1179436348
КрЫска
2007-05-18 01:12
2007.09.16
Написать SQL-запрос, осуществляющий выборку из 2-х таблиц.


15-1185911180
Riply
2007-07-31 23:46
2007.09.16
Первый шаг к намеченной цели :)