adsee1 发表于 2010-5-7 09:35:00

为什幺要操作一下CAD窗口.转出wmf图形长宽比例才正确

<p>当改变窗口大小时,如果不作一下窗口操作(点一下即可),转出来的wmf比例不是我指定的300*300,而是上一次窗口大小的长宽比例.请问这个要如何解决.</p><p>我试过delay也不行,请各位老大帮忙,这个问题困挠我好长时间了.<br/></p><p>(Defun C:gg ()<br/>&nbsp; (SetVar "WMFBKGND" 0) <br/>&nbsp; (SetVar "WMFFOREGND" 0)<br/>&nbsp; ;(setq oldWidth (vla-get-Width AcadObject))<br/>&nbsp; (VL-LOAD-COM)<br/>&nbsp; (setq AcadObject(vlax-get-acad-object)&nbsp; ;object<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; AcadDocument(vla-get-ActiveDocument AcadObject)&nbsp; ;Document<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; mSpace(vla-get-ModelSpace AcadDocument)&nbsp; ;Space<br/>&nbsp; )<br/>&nbsp; (vla-put-Width AcadDocument 300)<br/>&nbsp; (vla-put-Height AcadDocument 300)<br/>&nbsp;&nbsp;(getkword "\n是窗口大小已改變,按任意鍵繼續...")&nbsp;&nbsp;&nbsp; ;如果不写这句,转出来的wmf不是300*300,而是上一次窗口的长宽比例.<br/>&nbsp; (Command "ZOOM" "_E")<br/>&nbsp; (SetQ wfn "c:\\abc.wmf")<br/>&nbsp; (Command "WMFOUT" wfn "all" "")<br/>&nbsp; (PrinC) <br/>)</p>
页: [1]
查看完整版本: 为什幺要操作一下CAD窗口.转出wmf图形长宽比例才正确