求一个修剪程序

awd37

cass里面 的下水井 煤气井 画完之后 连接对应的线， 要一个一个的剪切，寻求好的程序  思路也可以啊，
剪完是这个样子
呼唤大神们~~~~~

awd37

自己顶~~~~~~~~

awd37

顶顶更健康

004

1.建立每个块对应的地物裁切范围线，
2.在要裁切的块处生成裁切范围线，并缩小偏移一个小距离生成栏选点集lst
3.用裁切范围线e作为裁切边界， 用（command “trim” e “” （ssget “f” lst （list （0 . “”）（cons 8 “图层）“”）过滤裁切，即可。

awd37

(ssget “F＂pt_list)
建立包含在经过 pt_list所定义的交叉框中所有图元的选择集。

交叉框是 怎么理解呢？  
（ssget “f” lst （list （0 . “”）（cons 8 “图层）“”）
能详细地讲解一下吗？

awd37

004 发表于 2013-4-22 11:17
1.建立每个块对应的地物裁切范围线，
2.在要裁切的块处生成裁切范围线，并缩小偏移一个小距离生成栏选点集 ...

现在我能取到 这些要剪切的井的中心点 坐标

能取出井的边框 线 被 trim 使用

现在如果手动模拟操作  按trim 然后选中 井的边框  然后点击 对应的那条线就剪切成功了。
  我就是点击对应井中间的那条线 这个动作怎么用程序实现呢？

awd37

004 发表于 2013-4-22 11:17
1.建立每个块对应的地物裁切范围线，
2.在要裁切的块处生成裁切范围线，并缩小偏移一个小距离生成栏选点集 ...

另外在那些连线上 隔一段距离就要放一个文字   问题是 文字 下面压着一条线 怎么剪切文字压着的一小段线段呢？

004

awd37 发表于 2013-4-22 13:34
另外在那些连线上 隔一段距离就要放一个文字   问题是 文字 下面压着一条线 怎么剪切文字压着的一小段线段 ...

（command “trim” e “” （ssget “f” lst （list （0 . “LWPOLYLINE”）（cons 8 “图层"）））“”）
用e做为裁切边界,用栏选方式仅裁切指定图层的多段线.
也可以用你说的模拟点击裁切,要用双元表，图元名+点坐标，称作双元表
(command "trim" e "" (list 图元名 pt ) “”)

裁切文字下的线，需获得文字的包围盒，其它的步骤与上相同。