如何将一个EMF格式的图像文件转换成BMP文件格式？

Question

如何将一个EMF格式的图像文件转换成BMP文件格式？

Answer 1

var
  temp:TImage;
  EMF:TMetaFile;
begin
  EMF:=TMetaFile.Create;
  temp:=TImage.Create(self);
  try
    EMF.LoadFromFile(filename1)
    temp.Width:=emf.Width;
    temp.Height:=emf.Height;
    temp.Canvas.Draw(0,0,emf);
    temp.Picture.Bitmap.SaveToFile(filename2;
  finally
    temp.free;
    emf.free;
  end;
end;

Answer 2

var
  meta: TMetaFile;
  bmp: TBitmap;
begin
  bmp := TBitmap.Create;
  try
    meta:= TMetaFile.create;
    try
      meta.LoadFromFile('c:\test.emf');
      bmp.Assign(meta);
      bmp.SaveToFile('c:\test.bmp');
    finally
      meta.Free;
    end;
  finally
    bmp.Free;
  end;
end;