设为首页 |收藏本站 |帮助 |加入VIP |积分充值

QQ登录

只需一步，快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步，快速开始

返回
发新贴
展开

通知     

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

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

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

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

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

x
有没有什么方法, 一次性将多条直线变为多段线???
回复

举报

csace
发表于 2008-9-3 09:58:20 | 显示全部楼层 来自： 中国广东广州
请看下面：' A4 d2 ^# P  |4 D" [
多段线.gif

评分

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

查看全部评分

回复 支持 反对

举报

sealive_leafage
发表于 2008-9-3 20:41:53 | 显示全部楼层 来自： 中国浙江宁波
命令：PEDIT，选一条直线，输入选项选J，选择多条直线，就行了！6 p$ r4 {; V; o6 V+ R3 b( W2 z% K0 @

; b. [# q9 d0 t3 y7 r+ y[ 本帖最后由 sealive_leafage 于 2008-9-3 20:43 编辑 ]

评分

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

查看全部评分

回复 支持 反对

举报

votasee
发表于 2008-9-4 14:33:19 | 显示全部楼层 来自： 中国江苏无锡
原帖由 maoyangmy 于 2008-9-3 09:43 发表 http://www.3dportal.cn/discuz/images/common/back.gif+ ^6 ?. C( ?! J% V8 v% G
有没有什么方法, 一次性将多条直线变为多段线???
9 l, l6 t7 ~* B
5 F6 w' Y+ }$ O! D9 z7 G7 I- d+ o
我觉得楼主可能是想问有没有快捷的方法..不是指用
: L& T& A8 N# EPEDIT的命令..7 h8 c: i7 ?6 r8 n( a9 V9 F2 a
  D6 ^$ q$ S3 H; x3 a8 d8 `
快捷方法.吗.我觉得应该写个小程序..或者用其它工具..
  h% j/ U, a2 w# v& v3 u& k0 R: o0 l# ?
运行一下命令.只要选定线.就OK了..所以我觉得...应该找个工具给楼主..
/ R  i$ j. z- p+ |, X2 ]
5 f7 ?! I  C* u7 l# @- C$ \事实上这样的工具我也需要...
9 u* @: n6 P! z( o0 U2 G0 w3 _
* h, q" d4 l: q1 {' k问题是:有时,我们作的线段.可能由于精度问题(没有使用精确作图)没有相接.
0 K7 Z. Q+ h; @; Y, y" C所以最好还要设定一个误差值..这样一来.没有相接的线,就自动连接到一起../ }1 a, r. [4 \9 |: x
) [$ F4 c# {' {+ z8 J
这样.有时作简图的时候,就方便多了..
回复 支持 反对

举报

shzyd
发表于 2008-9-5 20:58:24 | 显示全部楼层 来自： 中国浙江宁波

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

我也是今天刚从论坛学来的，只不过验证整理详细编辑一下，公布出来，大家享用！
- J. k& ?/ c6 h9 Q7 n% A使相互连接的不是“多段线”的普通豢瞻孜桓岸喽蜗摺钡牟僮鞑街
回复 支持 反对

举报

www1974
发表于 2008-9-7 21:22:10 | 显示全部楼层 来自： 中国江苏无锡
收集到的一个
# X( H, }/ s/ S  C: S! u2 m(defun l_to_pl (ssa / ss1 lines ent n)8 Z  W% t8 A& @+ E% G
  (defun l_to_pl:main (/ ent ss1 n)
# P" Y/ B* R7 `$ o* U/ z, R/ h4 f  (setq ent (ssname lines 0))) Y% D4 `, Q+ |( w4 R6 O
  (if (member (cdr (assoc 0 (entget ent)))
' x4 D8 b% {4 `* Z* h4 J8 ^* {       '("POLYLINE" "LWPOLYLINE" )
- `8 U3 I& P* F      )% v) y$ J5 H: n3 ~
    (if (/= 1 (logand (cdr (assoc 70 (entget ent))) 1))- E6 f# B# C# M3 ]
      (command "._pedit" ent "j" lines "" "" )' p- t+ [& F+ T4 v' q
    )" D! H$ C4 J* e+ W! A: p
    (command "._pedit" ent "y" "j" lines "" "" )' R& N0 }0 A* o. b5 {. n
  )5 M9 m3 \9 v1 A
  (setq lines (ssdel ent lines))1 o+ G) w- K6 \/ H) H+ M
  (setq ss1 (ssadd))! p7 ^" ^6 w) F% R# m7 i1 ]7 a
  (repeat (setq n (sslength lines))3 G8 A& q- x3 r) N0 b
    (setq ent (ssname lines (setq n (1- n))))9 C5 d* d" R% }# Q" ]
    (if (entget ent)( E' ?) h9 @3 n
      (setq ss1 (ssadd ent ss1))
# |' H2 C3 G' A5 O7 U    )5 v/ c% l4 h# r- |1 }+ K! ^$ m
  )
" m. J/ W. W1 o& B" L. y  (setq lines ss1)
- t# u2 M! i7 d+ Z  (while ( >(sslength lines) 0) (l_to_pl:main))
' t4 @, A- f9 V) J& K)
  H9 X2 C5 W3 D$ Q. N. S4 Q% \  (command "._undo" "be" )8 _% A3 l/ w" O( a2 t# F
  (setq ss1 (ssadd))
( _( A+ ?6 ?& B2 q* y1 W  (repeat (setq n (sslength ssa))$ g# c  C  ], j1 H& R- V
    (setq ent (ssname ssa (setq n (1- n))))
# E/ d& W" z  Y/ E6 n/ W" D    (if (and (entget ent); g8 ^6 L( U! L9 K
      (member (cdr (assoc 0 (entget ent)))
9 I$ \0 r* j& o) i* I4 L9 _      '("LINE" "ARC" "POLYLINE" "LWPOLYLINE" )4 ~7 v5 B+ U4 w. F2 E
      ): O+ R: N; B2 B: q
)
0 I3 D/ |) b( S; w2 r      (setq ss1 (ssadd ent ss1))8 u! R4 {  ~0 e
    ): V+ C  q" P$ T4 f0 g8 y' P
  )
  K  }  Q$ Y6 u, x/ L4 U( q5 j2 N6 o% X  (setq lines ss1)
2 H5 J; H) V9 t; V% a4 a  (l_to_pl:main)6 g5 a' C3 f/ d5 L7 v3 B8 h% J
  (command "._undo" "e" )& g. V' |% p/ J" t! ?( ^
); j" h* K. Q) {/ a7 T1 C- j& ^" Z$ x
  E! \8 @: p' E: |) T2 x
(defun c:lp (/ a)) W+ u3 q7 z# J: K1 y  f  F: i
  (setq a (ssget ))+ x! d8 |' t% x8 \
  (l_to_pl a)7 L6 g, @' y# p+ o! d# J* Q
;;;(l_to_pl lines)+ J3 ]! r/ r% H0 k0 J5 e
;;;(while (> (sslength (setq lines (l_to_pl lines))) 0) (progn))
1 B3 \' t1 t. H, [' p' N)

评分

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

查看全部评分

回复 支持 反对

举报

CHNLOONG
发表于 2008-9-7 21:28:30 | 显示全部楼层 来自： 中国浙江温州
原帖由 www1974 于 2008-9-7 21:22 发表 http://www.3dportal.cn/discuz/images/common/back.gif9 X8 \+ |4 p4 Z2 E% R4 p  y6 [
收集到的一个 9 X0 ?0 l7 `& X( v; j7 h
(defun l_to_pl (ssa / ss1 lines ent n)
. F2 x: D, r  ?  (defun l_to_pl:main (/ ent ss1 n)
" @8 Z+ S# z! u& V  p  (setq ent (ssname lines 0))4 X" E, y) P/ O% u
  (if (member (cdr (assoc 0 (entget ent)))& c- j( m: i. C$ C
              '("POLYLINE" "LWPOLYL ...

9 Z" d/ o3 J3 S) u& P# c4 w楼上的分明是在灌水，找罚。( \, }6 B) @* K' N2 F
2楼的厉害，用“合并”工具合并成！  M; t2 c" r: Z8 p3 e$ C: P& {

- {+ M1 t  V) w& K3 q4 B% e1 @[ 本帖最后由 CHNLOONG 于 2008-9-7 21:33 编辑 ]
回复 支持 反对

举报

www1974
发表于 2008-9-7 21:40:41 | 显示全部楼层 来自： 中国江苏无锡
原帖由 CHNLOONG 于 2008-9-7 21:28 发表 http://www.3dportal.cn/discuz/images/common/back.gif
  K/ q4 A# Z% v! i9 V7 L5 c2 {- q
楼上的分明是在灌水，找罚。0 Z7 k9 I9 x4 B& O
2楼的厉害，用“合并”工具合并成！

& ]3 k, |! W" Q3 n- O: G& e为人要谦虚，看不懂不要瞎说！
0 l# {' Z* V) _( Q, E7 k在ACAd中加载，后运行命令lp。

L2PL.rar

476 Bytes, 下载次数: 46
回复 支持 反对

举报

sitookudy
发表于 2010-3-16 16:02:59 | 显示全部楼层 来自： 中国北京
二楼的确实好用 多谢~~~~~~~~~~~~~~~~
回复 支持 反对

举报

blc007
发表于 2010-5-12 19:05:55 | 显示全部楼层 来自： 中国江西赣州
pedit命令学好了就可以弄了
回复 支持 反对

举报

5cllovely
发表于 2012-8-8 12:30:32 | 显示全部楼层 来自： 中国上海
6,8楼用lsp实现，更方便，pe命令需要按m，j，比较麻烦。就如同cad04复制需要按m一样，pe按m也不爽，这个绝对要赞
回复 支持 反对

举报

发表回复
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则


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

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

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