如何对TImage的MetaFile进行操作?

Question

我想在Timage组件上绘图然后保存为wmf格式,用以下代码
procedure work;
var
  mfc:TMetaFileCanvas;
begin
  image1.height:=...;
  image1.width:=...;
  image1.ClientWidth:=...;
  image1.ClientHeight:=...;
  mfc:=TMetaFileCanvas.Create(image1.Picture.Metafile,image1.Canvas.Handle);
  //这个create语句不能通过,为什么??end;

Answer 1

MetafileCanvas:=TMetafileCanvas.Create(Image1.Picture.Metafile, 0);

Answer 2

metafile[pagecount-1]:= TMetafile.Create;
  printcanvas:=tmetafilecanvas.Create(metafile[pagecount-1],printer.Handle);

Answer 3

VAR 
printcanvas:tcanvas;
metafile:tmetafile;metafile:= TMetafile.Create;
printcanvas:=tmetafilecanvas.Create(metafile,image1.Canvas.Handle);