怎么在dll中将字符转成图片,重分酬谢!(200分)

  • 主题发起人 windboy8337
  • 开始时间
W

windboy8337

Unregistered / Unconfirmed
GUEST, unregistred user!
最好请给出源代码!
 
在dll中生成一张bmp位图,将字符输出在图中。

然后可以直接将图片保存成文件 也可以保存成流当作返回值返回
 
将字符串保存为图像文件!

procedure genBmp(s,f:string);stdcall;
var
b:TBitmap;
w,h:integer;
begin
b:=TBitmap.Create ;
b.Canvas.Font.Size:=20;
b.Canvas.Font.name:='黑体';
b.Canvas.Font.color:=clRed;
w:=b.Canvas.TextWidth(s)+5;
h:=b.Canvas.TextHeight(s)+3;
b.width:=w;
b.height:=H;
b.Canvas.TextOut(1,1,s);

b.canvas.Brush.Style:=bsClear;

b.Canvas.Font.color:=clBlue;
b.Canvas.TextOut(3,2,s);
b.SaveToFile(f);

b.free;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
genBmp('这是字符串','d:/Test.bmp');
end;
 
to:jumboo:你能提供源代码吗?谢谢!!

to jsxjd:我的意思是在dll中实现!!!
 
多人接受答案了。
 
顶部