我在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倍左右

把word里的图片copy到 image控件吗  原始图片尺寸如何

是的，此时会看到image控件的图片变得很大

也许原始图片就那么大   放到word里是被压缩了呢

这里是把word的某一部分复制下来，接着作为图片粘贴到我的image1上，为什么会变大呢

你把完整代码发出来  我帮你调试一下

调试没用的，我调试了很久了，关键我发觉windows有很多Buger，特别是Office，估计微软招了一般脑残的人去开发