안녕하세요. 최용일입니다.



아래와 같이 메타캔버스에 그려서 저장하세요...



var

Bitmap: TBitmap;

MetaFile: TMetaFile;

MetaCanvas: TMetaFileCanvas;

begin

Bitmap := TBitmap.Create;

Bitmap.LoadFromFile('c:test.bmp');



MetaFile := TMetaFile.Create;

MetaFile.Width := Bitmap.Width;

MetaFile.Height := Bitmap.Height;



MetaCanvas := TMetafileCanvas.Create(MetaFile, 0);

MetaCanvas.Draw(0, 0, Bitmap);

MetaCanvas.Free;



MetaFile.SaveToFile('c:meta.emf');



Bitmap.Free;

MetaFile.Free;

end;



^^ 항상 즐코하세요...



궁금이 wrote:

> 여러 고수님들.. 크리스 마스 이브인데 이렇게 풀다가 풀다가

> 글을 오려요.. 글의 제목 처럼 비트맵을 메타파일로 전환을 하거나

> 아니면 저장하는 방법이 없는지.

> 방법이 있다면.. 답글좀 부탁하겠습니다.

> 그럼. 멋진 크리스 마스 보내시기를...

>