求选线，则该线图层上的线均改为实线

pimixixi · 发表于 2014-3-29 17:36:07

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

求选线，则该线图层上的线均改为实线 [color=#999999 !important][color=#999999 !important][复制链接]

ysq101 · 发表于 2014-3-29 17:37:34

搜索一下吧。。。论坛上会有的。。。

pimixixi · 发表于 2014-3-29 17:54:57

ysq101 发表于 2014-3-29 17:37
搜索一下吧。。。论坛上会有的。。。

搜索了一下，没找到，求哪位高手帮一下

st788796 · 发表于 2014-3-29 21:27:27

本帖最后由 st788796 于 2014-3-29 21:55 编辑

(defun c:tt (/ ss e)
  (if  (and (setq e (car (entsel "\nSelect Entity On Layer: ")))
            (setq ss (ssget “x" (list (assoc 8 (entget e)))))
      )
   (vl-cmdf ".chprop" ss "" "lt" "continuous" "")
)
(princ)
)

账号		自动登录	找回密码
密码			立即注册

[求助] 求选线，则该线图层上的线均改为实线

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

点评

评分