请教:如何将圆变成多义线?
请教:如何将圆变成多义线?先谢了! 为什么要把圆变成多段线?以前在R14的时代有人编过这样的程序的,现在似乎用不上了吧? <FONT size=2>谢谢回复!</FONT>
<FONT size=2>原因是在《<FONT color=#cc0033>计算机</FONT><FONT color=#cc0033>辅助</FONT><FONT color=#cc0033>设计</FONT><FONT color=#cc0033>AutoCAD</FONT> <FONT color=#cc0033>R14</FONT>/2000试题汇编》.P59页里有道题给的是圆,却要求完成后是多义线,且线宽是0。03的,我不知道怎么做</FONT> circle用donut表現
我有办法
楼主,你把圆对半剪切,再对称的镜像,再用多段线编辑命令把它合并,再设置线宽为0。03,这样的一个圆就是一条多义线了,而不是一个面域,不信你试试看 <p>哎呀!其实呢很简单,要不圆变成多段线可以采用这样的方法:</p><p>先输入:<font color="#f79709" style="BACKGROUND-COLOR: #000000;">pellipse </font>将其值设为<font style="BACKGROUND-COLOR: #2bd5b3;">1</font>,然后用el画椭圆,只不过你把椭圆的长轴和短轴设置成相等的长度就好了!</p> <p>以前做了一个这个程序...</p><p></p><p>(defun c:wf()<br/>(setq num (getvar "cdate")<br/> intnum (fix (* 1000000 num))<br/> num (- (* 1000000 num) intnum)<br/> num (fix (* 1000000 num))<br/>)<br/>(setq bname (strcat (rtos num 2 3) "a.wmf"))<br/>(setq aa (entsel))<br/>(setq ab (getpoint))<br/>(command "export" bname (car aa) "")<br/>(command "wmfin" bname ab "" "" "")<br/>)<br/></p><p></p><p>先作成块....导出为wmf文件就把arc变成了多段线..</p><p>再读进来炸开就可以了</p><p>用来做wipeout用的...hehe</p><p></p>
页:
[1]