hululu 发表于 2004-11-30 07:05:00

怎样批处理线型？

我的图上，中心线出现两种线型比例，很难看，怎样把其中的一种比例改为另一种比例？

zxdcad 发表于 2004-11-30 07:59:00

格式刷不方便吗？

xqyhome 发表于 2004-11-30 08:33:00

( DEFUN C:ZH (/       SS ENMING ED       I LEN KNAME) ;批量置换线型<BR>       ( PRINC "请选择要置换的直线:")<BR>       ( SETQ SS (SSGET))<BR>       ( SETQ KNAME (GETSTRING "新的线型名称="))<BR>       ( SETQ LEN (SSLENGTH SS))<BR>       ( SETQ I 0)<BR>       ( WHILE (&lt; I LEN) <BR>                       ( SETQ ENMING (SSNAME SS I))<BR>                       ( SETQ ED (ENTGET ENMING))<BR>                       ( IF (EQUAL (CONS 0 "LINE") (ASSOC 0 ED)) <BR>                                               (PROGN <BR>                                                                       ( SETQ ED <BR>                                                                       ( SUBST (CONS 6 KNAME) (ASSOC 6 ED) ED)<BR>                                                                       )<BR>                                                                                       ( ENTMOD ED)<BR>                                               )<BR>                       )<BR>                                       ( SETQ I (1+ I))<BR>       ) <BR>)<BR>

hululu 发表于 2004-12-4 21:02:00

谈一下想法：


试了一下上面的程序，有点像格式刷，对我来说不太方便。我作了个基础图，粘贴引用多家资料，中心线出现了不同的线型比例，中心线有几千个，一个一个的挑者刷太麻烦了。


经过查询，粘贴过来的线型在不同的层上，通过图层管理器。只开一层，其他全部关掉，再用刷子刷，几下就好了。再开一层，再刷，实现统一。


与大家共享。
页: [1]
查看完整版本: 怎样批处理线型？