请问图片上加字 ( 积分: 100 )

我想编程对图片进行处理。比如在图片上指定位置加货号呀。等文字信息，如何处理。？
图片存在SQL SERVER库中。

我想编程对图片进行处理。比如在图片上指定位置加货号呀。等文字信息，如何处理。？
图片存在SQL SERVER库中。

要下载Images控件

从SQL中取出图片，显示于Image控件。
在上面加字。Image.Canvas.TextOut(x, y 'Test');

ok,试试看，多谢！

请问具体是那个控件？ImageEn.v2.1.7?

Procedure NoImage(var jpg:TJpegImage);
Const Str='(No Image)';
var bmp:TBitmap;
x,y:integer;
begin
try
bmp:=TBitmap.Create;
bmp.Width:=60;
bmp.Height:=60;
bmp.Canvas.Font.Size:=8;
bmp.Canvas.Brush.Color:=clWhite;
bmp.Canvas.FillRect(bmp.Canvas.ClipRect);
bmp.Canvas.Font.Color:=clBlack;
bmp.Canvas.Font.Name:='Times New Roman';
x:=(bmp.Width-bmp.Canvas.TextWidth(Str)) div 2;
y:=(bmp.Height-bmp.Canvas.TextHeight(Str)) div 2;
bmp.Canvas.TextOut(x,y,Str);
jpg.Empty;
jpg.Assign(bmp);
finally
bmp.Free;
end;
end;
这个是生成一个60*60像素的小图标，上面显示(No Image)，返回Jpg类型的图，你这种方式，可以在调用时先传入图片，然后再作处理就可以了。

ok,谢谢各位。基本上做出来了。思路也就是从以上几位的提示而来。
生成一小图片（TextOut）
然后COPY到原来的大图片（产品图片之上）。