怎么在内存画Bmp,在上面写几个字,也就是说将几行字转换成一个bmp?? 怎么在内存画Bmp,在上面写几个字,也就是说将几行字转换成一个bmp?? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Var Bmptext : TBitmap;BmpText.Canvas.TextOut(); 是要保存成一个bmp,程序运行时动态显示几行字,然后在内存转换成bmp,保存下来 var bmp: tbitmap;begin //image1.Canvas.TextOut(0,0,'hello world'); //image1.Picture.SaveToFile('c:\hello.bmp'); bmp := tbitmap.Create; bmp.Height := 50; bmp.Width := 50; bmp.Canvas.TextOut(0,0,'hello world'); bmp.SaveToFile('c:\world.bmp'); bmp.Free;end; 同意 naughtyboy(一切都是为了明天) 这里又一个问题,在form上会有字显示出来,而我只是想在后台实现,不想看见 inno setup5.2.3 跳过指定页面的问题 文件夹内所有文件下载问题,如果解决 Delphi.net居然支持运算符重载和泛型了! 打印的一个小问题,在线等 UUSEE窗口下面的那滚动的字如何实现? 请问如何在OnMouseDown中判断是否是双击?我的dbclick坏了! 【求助】局域网程序的制作 请问各位,出现如下的错误提示该怎样解决? 为什么进行Table删除后无法Post? 怎样得到IE地址栏中的地址 关于tidTcpServer连接客户端个数的问题 谁有这个文章的完整的内容,包括图和文字
Bmptext : TBitmap;BmpText.Canvas.TextOut();
bmp: tbitmap;
begin
//image1.Canvas.TextOut(0,0,'hello world');
//image1.Picture.SaveToFile('c:\hello.bmp');
bmp := tbitmap.Create;
bmp.Height := 50;
bmp.Width := 50;
bmp.Canvas.TextOut(0,0,'hello world');
bmp.SaveToFile('c:\world.bmp');
bmp.Free;
end;