QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
1天前
查看: 9490|回复: 10
收起左侧

[已答复] 有没有什么方法, 一次性将多条直线变为多段线???

[复制链接]
发表于 2008-9-3 09:43:48 | 显示全部楼层 |阅读模式 来自: 中国辽宁鞍山

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
有没有什么方法, 一次性将多条直线变为多段线???
发表于 2008-9-3 09:58:20 | 显示全部楼层 来自: 中国广东广州
请看下面:
: V- F. v) [: i 多段线.gif

评分

参与人数 1三维币 +5 收起 理由
唐昕晨 + 5 应助

查看全部评分

发表于 2008-9-3 20:41:53 | 显示全部楼层 来自: 中国浙江宁波
命令:PEDIT,选一条直线,输入选项选J,选择多条直线,就行了!
6 T/ `" ^8 M9 D- H" E
+ Y/ k) w( c8 Y[ 本帖最后由 sealive_leafage 于 2008-9-3 20:43 编辑 ]

评分

参与人数 1三维币 +5 收起 理由
唐昕晨 + 5 应助

查看全部评分

发表于 2008-9-4 14:33:19 | 显示全部楼层 来自: 中国江苏无锡
原帖由 maoyangmy 于 2008-9-3 09:43 发表 http://www.3dportal.cn/discuz/images/common/back.gif
8 E% h3 k9 h# c有没有什么方法, 一次性将多条直线变为多段线???
* F1 u. g) @  h  f; ^( @* |
, R2 t+ l3 j# R) P6 [/ z$ v0 ?
我觉得楼主可能是想问有没有快捷的方法..不是指用2 b- U3 h& g9 p% y3 e
PEDIT的命令..

" R+ c1 q3 \9 ?
5 v" \, O3 g; h3 F快捷方法.吗.我觉得应该写个小程序..或者用其它工具..7 |+ M  C# g. \3 q1 g+ |9 O  Z6 b
: S6 t' r( W4 V# }/ z% h
运行一下命令.只要选定线.就OK了..所以我觉得...应该找个工具给楼主..5 p" S, x+ W  ~9 y
+ F  F8 R* \/ i8 z( I
事实上这样的工具我也需要...
: W- l5 |% k/ l& Y
) X5 t9 S, `2 G+ Q. [问题是:有时,我们作的线段.可能由于精度问题(没有使用精确作图)没有相接.
5 P7 t7 ~8 S) f( G! A1 g所以最好还要设定一个误差值..这样一来.没有相接的线,就自动连接到一起..
+ ^( |0 F9 B( f* O8 x9 @" {# y. x2 L
这样.有时作简图的时候,就方便多了..
发表于 2008-9-5 20:58:24 | 显示全部楼层 来自: 中国浙江宁波

合并多段线为“多段线”的操作步骤

我也是今天刚从论坛学来的,只不过验证整理详细编辑一下,公布出来,大家享用!
  h: D6 U' P. g1 T  Q, G使相互连接的不是“多段线”的普通豢瞻孜桓岸喽蜗摺钡牟僮鞑街
发表于 2008-9-7 21:22:10 | 显示全部楼层 来自: 中国江苏无锡
收集到的一个
& }* L% O7 G6 p6 c4 w6 u(defun l_to_pl (ssa / ss1 lines ent n). A4 R7 ?: [# n
  (defun l_to_pl:main (/ ent ss1 n)- K  a5 v6 b3 ?) H! [
  (setq ent (ssname lines 0))8 y* X; [  \. j, w
  (if (member (cdr (assoc 0 (entget ent)))
3 x3 K8 q8 U3 d: S6 h' i9 A' B! Q6 h8 d       '("POLYLINE" "LWPOLYLINE" )1 j- V  ]/ X! W
      )- n( O, V7 j! z( l8 ^: \- l4 y
    (if (/= 1 (logand (cdr (assoc 70 (entget ent))) 1)). s3 ]. F7 I5 R; K( u9 |
      (command "._pedit" ent "j" lines "" "" )2 L9 ^* Y; e9 _* s
    )
+ i0 B9 C# j' D. {% ~- m6 \+ h! [    (command "._pedit" ent "y" "j" lines "" "" )7 ?9 C5 j# z+ U- J& L" a
  )$ i  Y$ Y( G% ]9 h! W3 N/ M# d
  (setq lines (ssdel ent lines))$ ~7 r! O0 V$ z  h
  (setq ss1 (ssadd))
. A; Y5 j% f8 A" W  (repeat (setq n (sslength lines))5 Y  g& N. J* v  n5 Z3 y
    (setq ent (ssname lines (setq n (1- n))))
. u3 ^) X/ X! M7 K- }    (if (entget ent)
  o0 V( ]' S& c% I% ~      (setq ss1 (ssadd ent ss1))( T) {; p' M* \3 v1 C  k
    )* v7 A- {: n0 B$ x9 E
  )9 [* T4 D2 H7 a, Q  S. `4 |
  (setq lines ss1)
( O: b% J% l/ D$ n  (while ( >(sslength lines) 0) (l_to_pl:main))
, m/ W2 G7 q, I3 I0 t/ u)2 u' O- U  }* ]
  (command "._undo" "be" )
% |) s9 X) ]  H6 H" _+ [  (setq ss1 (ssadd))
4 t/ Q1 k0 B+ F* Z3 H  (repeat (setq n (sslength ssa))+ h* o, u! u( r! P( [3 T
    (setq ent (ssname ssa (setq n (1- n)))); l: E4 M9 g0 z2 Q# S
    (if (and (entget ent)
% W) k, A+ c1 y0 ?; B* m      (member (cdr (assoc 0 (entget ent)))
) q5 [8 m- b2 k/ b+ k$ \8 g" k$ |      '("LINE" "ARC" "POLYLINE" "LWPOLYLINE" )% i+ K8 ~: }; j* k$ s; a3 J
      )
7 b% ~! w: R7 L; L. d5 C8 c )
) T5 Q: f  p+ M- x8 O1 L0 |! n      (setq ss1 (ssadd ent ss1))
1 `4 E" B. B7 m/ G1 Y2 i6 p2 T( f    )
, A- y2 u: h  h1 P  )% T' h* k+ ~; p7 I
  (setq lines ss1): ~- U3 l1 w% H# j. @/ o8 l, w
  (l_to_pl:main)
! M% Y: E+ U6 ~& V+ Q  (command "._undo" "e" )3 p9 m% q4 r( k5 Q1 Z
)! _# G3 I1 n8 r* A

3 q& _. t7 L/ i! y8 W(defun c:lp (/ a)! ?( C5 p8 S$ A' c; Z
  (setq a (ssget ))
* K7 a( l: d3 {7 ?; q. J) r  (l_to_pl a); Q% k( n" l; D# w0 {4 q
;;;(l_to_pl lines)
* |! _1 @4 l  F% H5 q;;;(while (> (sslength (setq lines (l_to_pl lines))) 0) (progn))" y; e( y4 I0 B8 C# Y* w5 ?/ m  r
)

评分

参与人数 1三维币 +5 收起 理由
woaishuijia + 5 应助

查看全部评分

发表于 2008-9-7 21:28:30 | 显示全部楼层 来自: 中国浙江温州
原帖由 www1974 于 2008-9-7 21:22 发表 http://www.3dportal.cn/discuz/images/common/back.gif* {9 W% L; F  F
收集到的一个
- Z! g* V9 r3 [6 x/ m(defun l_to_pl (ssa / ss1 lines ent n)
- j  w& T1 `/ J3 o  y, w+ g  (defun l_to_pl:main (/ ent ss1 n)) G/ k7 Q0 \  o4 K' `' U0 C: s
  (setq ent (ssname lines 0)): `0 u! {. A! |4 C9 P' w
  (if (member (cdr (assoc 0 (entget ent)))+ D2 s' ], v# a* x& K
              '("POLYLINE" "LWPOLYL ...

0 T/ M1 e+ ^' ]% R楼上的分明是在灌水,找罚。
, v7 N* q8 G0 H0 G2楼的厉害,用“合并”工具合并成!& g' j8 v) d1 z4 E( g: I. K' _1 n

# N6 R6 V# P: r7 [8 n# z) Q[ 本帖最后由 CHNLOONG 于 2008-9-7 21:33 编辑 ]
发表于 2008-9-7 21:40:41 | 显示全部楼层 来自: 中国江苏无锡
原帖由 CHNLOONG 于 2008-9-7 21:28 发表 http://www.3dportal.cn/discuz/images/common/back.gif/ K6 e8 \& y, s' J2 \) L
) J; U( Q! C; k% H: T
楼上的分明是在灌水,找罚。( P8 }" ~. U- U2 z+ n2 N
2楼的厉害,用“合并”工具合并成!

# K5 y! o( l+ H为人要谦虚,看不懂不要瞎说!2 T* `& p5 K* u. c# n' s5 E  q
在ACAd中加载,后运行命令lp。

L2PL.rar

476 Bytes, 下载次数: 46

发表于 2010-3-16 16:02:59 | 显示全部楼层 来自: 中国北京
二楼的确实好用 多谢~~~~~~~~~~~~~~~~
发表于 2010-5-12 19:05:55 | 显示全部楼层 来自: 中国江西赣州
pedit命令学好了就可以弄了
发表于 2012-8-8 12:30:32 | 显示全部楼层 来自: 中国上海
6,8楼用lsp实现,更方便,pe命令需要按m,j,比较麻烦。就如同cad04复制需要按m一样,pe按m也不爽,这个绝对要赞
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表