几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量

几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量 (http://www.dimcax.com/hust/index.php)
-   ObjectARX(AutoLISP) (http://www.dimcax.com/hust/forumdisplay.php?f=178)
-   -   有没有办法将已ssget()出来的物体放到1层并设置为颜色和线型bylayer?? (http://www.dimcax.com/hust/showthread.php?t=10337)

yang686526 2009-04-25 05:14 PM

有没有办法将已ssget()出来的物体放到1层并设置为颜色和线型bylayer??
 
有没有办法将已ssget()出来的物体放到1层并设置为颜色和线型bylayer??
www.dimcax.com
有没有办法将已ssget()出来的物体放到1层并设置为颜色和线型bylayer??
如题:有没有办法将已ssget()出来的物体放到1层并设置为颜色和线型bylayer??
谢谢!

给你编一个程序:
(defun c:bssget-la ()
(setq en (ssget ) n (sslength en) i 0 laa (getstring "要变的层:"))
(repeat n
(setq en1 (entget (ssname en i)) )
(setq en1 (subst (cons 8 laa)(assoc 8 en1) en1))
(entmod en1)
(setq i (+ i 1))
))
gbg


所有的时间均为北京时间。 现在的时间是 07:36 AM.