[编程申请]：只选择一根线从而把端点相连的线全部选出来

yangjr · 发表于 2004-4-27 15:05:37

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

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

×

请高手们帮忙编一个
只选择任意一根线（line）从而把端点相连的线全部选出来的lsp程序。有下面图中的两种情况。

绘图员 · 发表于 2004-4-28 09:33:02

如果都是line线，你如何选中所有的线？我告诉你一个好办法：如果你确定所有的line线都首尾相连，你可以用晓东工具箱中的连接成pl线，然后取pl顶点

yangjr · 发表于 2004-4-28 10:47:58

我是想编一个子程序，利用选择到的线的端点选择到下一根（或两根）线，又用新获得的线选择。。。。。直到将端点相连的线全部选出来。很有用的，如果能成功能在众多的线中把端点相连的线单独选出来，可以搜索外墙线等等。进一步说只要能获得端点坐标的实体都能使用（如弧线。。。）。

zxdcad · 发表于 2004-4-29 07:25:09

若不想编程，只能将相连的线变成PL线了，用PEDIT选择第一根线(端部)，将其转为PL线，选加入(J )选项后用鼠标在大范围内选择一下，Atocad 会自动将选择范围内与该直线首尾相连的对象(直线、园弧、PL线)组合成一个新的PL对象。
我经常这样用，特别是检查封闭链的时候（填充、三维拉伸前的面域），这很方便呀。

yangjr · 发表于 2004-4-29 16:36:31

我想复杂了，增加一个大范围选择是可以解决。

陌生人 · 发表于 2004-5-1 23:40:26

我不怎么用et，不过记得以前lucas介绍过et里面有个 fs 命令，可以把相接触的实体选中

ydf7332462 · 发表于 2004-5-2 00:13:23

怎样将Line+arc连成最长的pline

yangjr · 发表于 2004-5-2 22:38:45

编好了，可以将Line+arc连成最长的pline 。
(defun c:Plfzmj ( / ss pt1)
  (setvar "CMDECHO" 0)
  (setq ss (ssget "X" '((0 . "LINE,ARC"))))
  (setq pt1 (entsel "\n选择一条外围线:"))
  (command "PEDIT" pt1 "" "j" ss "" "")
  (princ)
)

eachy · 发表于 2004-5-2 22:54:05

最初由 yangjr 发布
[B]编好了，可以将Line+arc连成最长的pline 。
(defun c:Plfzmj ( / ss pt1)
  (setvar "CMDECHO" 0)
  (setq ss (ssget "X" '((0 . "LINE,ARC"))))
  (setq pt1 (entsel "\n选择一条外围线:"))
  (command "PEDIT... [/B]

Pedit->M->J->1

aeo · 发表于 2004-5-3 22:52:08

以前我写过的
命令名pj ，就是只选一根线.把首尾相连的线连成pl线
你不想连成pl线，只要把最后一句改一下就行了.

自己找找.很久以前的了.

longinmymind · 发表于 2004-5-6 14:44:28

直接筐选不解行了,何必这么麻烦了

xxming · 发表于 2004-5-6 21:43:18

如果是LINE，PLINE，ARC相接能行吗该怎么改？

JOSDENNIS · 发表于 2004-5-7 14:13:42

可以.

ydf7332462 · 发表于 2004-5-12 18:22:27

PEDIT 框选确得最长线，但非所望--含指定线的最长线
如图附件

lsjjm · 发表于 2004-7-9 06:10:07

最初由 yangjr 发布
[B]请高手们帮忙编一个只选择任意一根线（line）从而把端点相连的线全部选出来的lsp程序...[/B]

请参考:
http://www.xdcad.net/forum/showthread.php?s=&threadid=209180

账号		自动登录	找回密码
密码			立即注册

[编程申请]：只选择一根线从而把端点相连的线全部选出来

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

Re: [编程申请]：只选择一根线从而把端点相连的线全部选出来

浏览过的版块