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

Вниз

вывести текст на image сожержащий jpeg?   Найти похожие ветки 

 
Ezorcist   (2007-03-07 21:47) [0]

Image1.Canvas.TextOut(10,10,"22222");

error "can only modify an image if it contains a bitmap"


 
Джо ©   (2007-03-07 21:57) [1]

Примерно так.
var
 Bmp: TBitmap;
begin
 Bmp := TBitmap.Create;
 try
   Bmp.Width := Image1.Picture.Width;
   Bmp.Height := Image1.Picture.Height;
   Bmp.Canvas.Draw(0,0,Image1.Picture.Graphic);
   Bmp.Canvas.TextOut(0,0,"Text");

   Image1.Picture.Bitmap.Assign(Bmp);
 finally
   Bmp.Free
 end;
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.027 c
15-1173263753
Vudu
2007-03-07 13:35
2007.04.01
Автозагрузка


2-1173182796
wahnsinng
2007-03-06 15:06
2007.04.01
Ошибка


2-1173632335
Димон
2007-03-11 19:58
2007.04.01
Нумерация каждой ячейки StringGrid?


15-1173505252
Expell
2007-03-10 08:40
2007.04.01
Сторонние компоненты


2-1173102019
Ezorcist
2007-03-05 16:40
2007.04.01
Рекция на поворот колеса мыши?