GDI+ 学习记录(30): MetaFile 文件操作
GDI+ 学习记录(30): MetaFile 文件操作
涂孟超 发表于3年前
GDI+ 学习记录(30): MetaFile 文件操作
  • 发表于 3年前
  • 阅读 6
  • 收藏 0
  • 点赞 0
  • 评论 0

新睿云服务器60天免费使用,快来体验!>>>   

//显示 MetaFile 文件
var
  g: TGPGraphics;
  img: TGPImage;
begin
  g := TGPGraphics.Create(Canvas.Handle);
  img := TGPImage.Create('c:\temp\x.emf'); {文件要存在}

  g.DrawImage(img, 11, 11);

  img.Free;
  g.Free;
end;

 
 
 
 
 

 

 

  
//绘制 MetaFile 文件 var g: TGPGraphics; mf: TGPMetafile; p: TGPPen; begin mf := TGPMetafile.Create('c:\temp\y.emf', Canvas.Handle); {文件不存在则建立; 存在则覆盖} g := TGPGraphics.Create(mf); p := TGPPen.Create(MakeColor(255,255,0,0),2); g.DrawRectangle(p, 11, 11, 111, 88); p.Free; mf.Free; g.Free; {文件绘制完成, 并已保存} end;
  • 打赏
  • 点赞
  • 收藏
  • 分享
共有 人打赏支持
粉丝 12
博文 2004
码字总数 14107
×
涂孟超
如果觉得我的文章对您有用,请随意打赏。您的支持将鼓励我继续创作!
* 金额(元)
¥1 ¥5 ¥10 ¥20 其他金额
打赏人
留言
* 支付类型
微信扫码支付
打赏金额:
已支付成功
打赏金额: