《CAD中计算多条多段线的总长(含脚本制作方法)》由会员分享,可在线阅读,更多相关《CAD中计算多条多段线的总长(含脚本制作方法)(2页珍藏版)》请在金锄头文库上搜索。
CAD中计算多条多段线的总长方法:1、先将以下代码复制到记事本中。(defun c:n()(setq tleng 0)(setq s (ssget)(setq n (sslength s)(setq index (- n 1)(repeat n(vl-load-com)(setq ent (ssname s index)(setq index (- index 1)(setq curve-obj (vlax-ename-vla-object ent)(setq leng (vlax-curve-getDistAtParamcurve-obj(vlax-curve-getEndParam curve-obj)(setq tleng (+ tleng leng)(princ leng)(princ n)(setq prscreemtext (strcat n总共计算 (itoa n) 个对象,总长度为 (rtos tleng 2 1)(princ prscreemtext)(princ)2、将文件更名为 统计多段线长度.lsp 并复制到CAD安装目录下。3、打开CAD软件,在命令中输入AP弹出加载框,如下图所示:选择 统计多段线长度.lsp 加载4、使用时输入命令 N 选择所需要计算的多条多段线,确认即可。已在CAD2007中测试过,完全OK