张和平 发表于 2013-3-28 09:16:53

vla-getboundingbox得到的块的角点有问题

vla-getboundingbox得到的块的角点有问题，用这些角点绘制一个矩形时，这个矩形相对块有一定的偏移，有时候偏移还很大。
如下图所示：


程序：（论坛上找的）
(DEFUN C:xxx ()
(SETVAR "CMDECHO" 0)
(SETQ OLDOS (GETVAR "OSMODE"))
(IF (SETQ S1 (CAR (ENTSEL "\nSelect One Object 选择一个图元 :"))) (PROGN
(vla-getboundingbox (vlax-ename->vla-object S1) 'minpoint 'maxpoint)
(setq pmax (vlax-safearray->list maxpoint)
      pmin (vlax-safearray->list minpoint))
(SETVAR "OSMODE" 0)
(COMMAND ".RECTANG" PMIN PMAX)
(SETVAR "OSMODE" OLDOS)
))
(SETVAR "CMDECHO" 1)
(PRINC)
)

highflybir 发表于 2013-3-28 09:26:15

用command命令时候要注意UCS。

张和平 发表于 2013-3-28 11:26:05

highflybir 发表于 2013-3-28 09:26 static/image/common/back.gif
用command命令时候要注意UCS。

我已经搜到你的帖子了，，命令引用了你的函数，现在基本正确了。。感谢

ruirui999 发表于 2018-1-15 15:09:16

哪个贴子？

ruirui999 发表于 2018-1-15 15:09:29

能给个链接吗？
页: [1]
查看完整版本: vla-getboundingbox得到的块的角点有问题