CAD如何统计多线段总长度

CAD统计多条多线段长度2013-11-0621:55:12|分类：CAD|举报|字号订阅TECAD统计多条多线段长度-阳舟-轻钢别墅的博客TE(princ\n程序：统计线段长度命令：zz)(defunC:zz(/CURVETLENSSNSUMLEN)(vl-load-com)(setqSUMLEN0)(setqSS(ssget'((0.CIRCLE,ELLIPSE,LINE,*POLYLINE,SPLINE,ARC))))(setqN0)(repeat(sslengthSS)(setqCURVE(vlax-ename-vla-object(ssnameSSN)))(setqTLEN(vlax-curve-getdistatparamCURVE(vlax-curve-getendparamCURVE)))(setqSUMLEN(+SUMLENTLEN))(setqN(1+N)))(princ(strcat\n共选择(itoa(sslengthSS))条线段.线段总长:(rtosSUMLEN23).))(princ))将以上代码复制在记事本内后“另存为”→“统计线段长度.lsp”打开CAD，运行“appload”命令加载刚保存的“统计线段长度.lsp”文件按命令提示“程序：统计线段长度命令：zz”输入命令zz选择要统计长度的线段即可。命令:程序：统计线段长度命令：zz命令:命令:zz选择对象:指定对角点:找到4个选择对象:共选择4条线段.线段总长:2365.36