Delphi里用TClipboard获取粘贴板里的图片,为什么获取到的图片高和宽都比原图大4倍呢
我在Delphi里用TClipboard获取粘贴板里的图片,为什么获取到的图片高和宽都比原图大4倍呢?
WordApp.Selection.SetRange(1,100);
WordApp.Selection.CopyAsPicture;
sleep(500);
Clipboard := TClipboard.Create;
Image1.Picture.Metafile.Assign(Clipboard);
Bmp := TBitmap.Create;
Bmp.Height:=Image1.Picture.Metafile.Height;
Bmp.Width:=Image1.Picture.Metafile.Width;
此时Image1.Picture.Metafile.Height和Image1.Picture.Metafile.Width大于原来4倍左右