转换bmp图片为Meta文件对象代码,Delphi代码库,德仔网

代码语言

代码分类

【Delphi】转换bmp图片为Meta文件对象

作者:jellyvice / 发布于2013/12/3/ 1114

procedure BitmapToMetafile(const Bmp: Graphics.TBitmap;
 const EMF: Graphics.TMetafile);
var
 MetaCanvas: Graphics.TMetafileCanvas; // canvas for drawing on metafile
begin
 EMF.Height := Bmp.Height;
 EMF.Width := Bmp.Width;
 MetaCanvas := Graphics.TMetafileCanvas.Create(EMF, 0);
 try
  MetaCanvas.Draw(0, 0, Bmp);
 finally
  MetaCanvas.Free;
 end;
end;

　　

试试其它关键字

　Meta文件　

同语言下

可能有用的

jellyvice贡献的其它代码(28)

Copyright © 2004 - 2024 dezai.cn. All Rights Reserved 站长博客粤ICP备13059550号-3