kaixin119 发表于 2004-2-21 21:34:00

求助各位:编一个能连接断开的SPLINE线的LISP程序

求助各位:编一个能连接断开的SPLINE线的LISP程序,


可以用来连接两跟断开的SPLINE线,比如:等高线,小路,......,也可以用在接图上


拜托了!!!!!!!!!!!

kaixin119 发表于 2004-2-22 16:56:00

呵呵，找到了，不用麻烦大家了，是                                                                               <A name=58896><FONT color=#990000><B>BDYCAD</B></FONT></A>                                                                                               编的程序

xlmx-whj 发表于 2004-2-23 23:58:00

这个程序在哪我也在找呢？

li809 发表于 2005-2-5 16:19:00

找到了请发给我好吗


baoshun01@21cn.com

wedg 发表于 2005-3-25 22:33:00

能否把程序给发上来给大家共享？

龙龙仔 发表于 2005-3-31 08:47:00

本帖最后由 作者 于 2005-3-31 11:56:56 编辑 <br /><br /> r2006好像已增加这样的功能.




<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>Join Objects<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>Use to combine similar objects into a single object. You can also create<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>complete circles and ellipses from arcs and elliptical arcs. You can join<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>■ Arcs<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>■ Elliptical arcs<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>■ Lines<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>■ Polylines<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>■ Splines<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>The object to which you want to join similar objects is called a source object.<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>Objects to be joined must be located in the same plane. Additional restrictions<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>for each type of objects are described in the command.<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>NOTE When joining two or more arcs (or elliptical arcs), the arcs are joined<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt; mso-layout-grid-align: none"><FONT face="Times New Roman"><FONT size=2>counterclockwise beginning from the source object.<o:p></o:p></FONT></FONT>



<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><o:p><FONT face="Times New Roman" size=2>        </FONT></o:p>













gzbccy 发表于 2011-1-10 12:06:07

楼主，请你共享下好吗？

ljttjl 发表于 2011-1-10 18:38:45

样条曲线连接程序演示如下：

chmenf087 发表于 2011-1-10 18:40:46

pedit命令CAD自带

风流少年时 发表于 2011-1-12 23:58:45

没看懂，不知道什么意思。
页: [1]
查看完整版本: 求助各位:编一个能连接断开的SPLINE线的LISP程序