计算多条线段和曲线的总长度

安徽红狼

AUTOCAD里怎样计算多条线段和曲线的总长度？

cqzhihuaq

第一步：合并线段 pedit
   第二步：list

iassqqq

2#的方法是正确的
) Y  T+ f# ^. h8 v8 R4 s  F先PE+M+Y+J+空格+空格
# m7 S" E  j# x1 T5 D# L1 P2 h组成多段线看特性
  a3 e( t1 D2 O3 T' j2 v不能组成多段线的就只能一个个加

xiaoma76

(defun c:ZCD ()
(setvar "cmdecho" 1)
5 Z& |$ R0 m; @, b(setq en (ssget (list '(0 . "spline,arc,line,ellipse,LWPOLYLINE"))))
0 q; Q4 M* T, o- @(setq i 0)
(setq ll 0)
(repeat (sslength en)
; a2 d8 Z9 B* K" s% `. J' s3 q, T  (setq ss (ssname en i))
7 L% j+ C; G: {% u  (setq endata (entget ss))
* f+ c. }( Z9 m( I/ ^  (command "lengthen" ss "")
. g: D& i8 `! I# N, [1 {- T' R  (setq dd (getvar "perimeter"))
  (setq ll (+ dd ll))
6 w0 ~( R& a) }. B" V8 X  (setq i (1+ i))
8 ]- C8 U  @; b7 Z/ B3 P' E)
' D8 m, i( L5 W, w8 |(princ "所选线条总长为：")(princ ll)(princ)
) R; P  J$ \9 G/ _- X! X)


: f- V4 T6 G9 S; u3 A9 T8 ~用这个LISP。
7 \6 B% Q0 ^* N4 e0 n
[ 本帖最后由 woaishuijia 于 2008-6-3 18:58 编辑 ]

JOYUI

通过编辑多段线，PE，将零散的线条成为一个整体，再LIST即可看到了。