xyz2009xyz 发表于 2011-7-18 19:44:04

四条首尾相连单线批量转矩形方法

求助：是否有四条首尾相连单线批量转矩形方法，能否用LISP实现
如图：

xyz2009xyz 发表于 2011-7-18 19:45:22

本帖最后由 xyz2009xyz 于 2011-7-18 19:45 编辑

都是由四条线构成的，我想单独转成一个一个的矩形，能否用LISP实现？希望大虾帮帮忙！

Andyhon 发表于 2011-7-18 19:47:47

先试试这个
Command: pedit
Select polyline or : m
Select objects: all
4 found

Select objects:
Enter an option : j
Join Type = Extend
Enter fuzz distance or <0.0000>: 0.0001
3 segments added to polyline
Enter an option :

xyz2009xyz 发表于 2011-7-19 08:04:48

可以，昨天自己测试了这个命令不知道为什么没成功，还搞了个软件，把CAD搞崩了，重装了CAD，今早一弄就好了，哎，3Q

xyz2009xyz 发表于 2011-7-19 08:37:42

还有个问题，有的用PEDIT连不起来是什么原因？还是四条线？

xiaxiang 发表于 2011-7-19 08:49:12

模糊距离的问题？要确认是否真的首尾相连。
给个QJCHEN的程序

xyz2009xyz 发表于 2011-7-19 12:27:41

回复 xiaxiang 的帖子

发个测试图，本来和批量打印是一个帖子，连接好的图框有的用秋枫大虾批打也识别不出来，不知道什么原因，图框都处理到了图框层，因为不是自己画的图，所以就很不标准

Andyhon 发表于 2011-7-19 13:25:35



主要是重线的干扰
(框之右侧)


yoyoho 发表于 2011-7-20 23:32:53

回复 xiaxiang 的帖子

感谢楼主分享源码程序,谢谢!
页: [1]
查看完整版本: 四条首尾相连单线批量转矩形方法