a934990825 发表于 2017-9-29 18:00:38

等高线的 高程 不是210.005就是209.993这样的 如何解决呢

等高线的 高程 不是210.005就是209.993这样的   有没有插件 或者什么原因造成的谁给分析解决一下

czb203 发表于 2017-9-29 22:09:10

;自己加个循环吧

(defun c:tt ()
(princ "功能：等高线高程值取整")
(setq ss (ssget))
(setq ent (ssname ss 0))
(setq obj (vlax-ename->vla-object ent))
(setq zgc (itoa (fix (vla-get-Elevation obj))))
(setq ssv (vla-get-activeselectionset (vla-get-activedocument (vlax-get-acad-object))))
(vlax-for obj ssv (vlax-put obj 'Elevation zgc))
(princ)
)

pengfei2010 发表于 2017-10-5 20:17:29

回帖是一种美德！感谢楼主的无私分享 谢谢

004 发表于 2019-4-23 01:25:08

标记一下,是个少见的简单问题..

004 发表于 2019-4-23 01:25:32

标记一下,是个少见的简单问题..
页: [1]
查看完整版本: 等高线的 高程 不是210.005就是209.993这样的 如何解决呢