探索者问题解答-收集,更专业。
yang625659738
2014年03月10日 12:35:02
来自于探索者
只看楼主

解答探索者软件各类问题收集软件中的各种BUG·做人要厚道·看帖必回

解答探索者软件各类问题
收集软件中的各种BUG
·做人要厚道· 看帖必回


免费打赏
wxa123wl
2014年03月17日 18:21:31
22楼
qq344580050 发表于 2014-3-17 12:29 可以在把这个加载我的那个的前面,,tssd 的转图效果就会很好!从一个网站下的资料多数不会清理的完整,比如有些关闭、冻结的图层,一个有标志的图块,下面的程序完成:1 删除所有关闭、冻结图层上的实体,不包括块内实体2 删除标志块3 Purge 文件4 保存Dwg处理的图形可以直接Close命令:cleardwg ,可以在命令行使用 vl-load-all 加载后使得新打开的图形中命令也有效。;;使用时可以用 vl-load-all 加载,格式如;; (vl-load-all “c:\\cleardwg.vlx”)(vl-load-com)(defun c:cleardwg (/ thisdrawing ss lyrlst olderr myerr) (defun myerr (msg) (if (/= msg “取消”) (princ “\*取消*”) ) (vla-endundomark thisdrawing) (setq *error* olderr myerr nil ) (princ) ) (setvar “cmdecho” 0) (setq thisdrawing (vlax-get-property (vlax-get-acad-object) ‘activedocument ) ) (vla-startundomark thisdrawing) (setq olderr *error* *error* myerr ) (vlax-map-collection (vlax-get-property thisdrawing ’layers) ‘(lambda (lyr / name s tf) (setq name (vla-get-name lyr)) (if (or (setq tf (= (vla-get-freeze lyr) :vlax-true)) (= (vla-get-layeron lyr) :vlax-false) ) (progn (if (= (vla-get-lock lyr) :vlax-true) (vla-put-lock lyr :vlax-false) ) (if tf (setq lyrlst (cons name lyrlst)) ) (vla-put-freeze lyr :vlax-false) (if (setq s (ssget “X” (list (cons 8 name)))) (vl-cmdf “.erase” s “”) ) ) ) ) ) ;|(if lyrlst (vlax-map-collection (vlax-get-property thisdrawing ’blocks) ‘(lambda (b / bn) (setq bn (vla-get-name b)) (if (and (/= bn “*MODEL_SPACE”) (/= bn “*PAPER_SPACE”) (not (wcmatch bn “`*PAPER_SPACE?”)) ) (vlax-map-collection b ’(lambda (x) (if (vl-position (vla-get-layer x) lyrlst) (vla-delete x) ) ) ) ) ) ) )|; (if (setq ss (ssget “x” '((2 . “*网易*,*土木在线*,*园林站图块*”)))) (vl-cmdf “.erase” ss “”) ) (vla-purgeall thisdrawing) (vla-purgeall thisdrawing) (vla-purgeall thisdrawing) (vla-zoomextents (vla-get-application thisdrawing)) (vla-save thisdrawing) (vla-endundomark thisdrawing) (setq *error* olderr myerr nil ) (princ))(princ “\n清理图层, 命令: ClearDwg, eachy”)(princ)
回复
yyhomm
2014年03月17日 18:49:31
23楼
杨子 发表于 2014-3-15 12:12 墙柱设置中第一个页签右下方位置,有个“是否角筋加强、箍套和拉筋直径不同”应该可以满足你的要求。不能解决问题,我指的是在构件归并时弹出来对话框,里面的箍筋间距设置是死的,不能调整,生成的配筋全是@100
回复
yang625659738
2014年03月17日 20:18:03
24楼
yyhomm 发表于 2014-3-17 18:49 不能解决问题,我指的是在构件归并时弹出来对话框,里面的箍筋间距设置是死的,不能调整,生成的配筋全是 …恩,确实,暂时只能自己先修改了。
回复
yang625659738
2014年03月17日 20:21:04
25楼
wxa123wl 发表于 2014-3-17 18:21 可以在把这个加载我的那个的前面,,tssd 的转图效果就会很好!从一个网站下的资料多数不会清理的完整, …:L这个就看不明白了,不会编程啊:handshake
回复
yang625659738
2014年06月05日 22:21:36
26楼
继续支持,及时沟通
回复

相关推荐

APP内打开