tanle2020 发表于 2009-9-4 12:22:00

[求助]帮小弟解决一个很小的问题（谢谢）

<p><font face="宋体" size="2">请大家帮小弟解决一个很小的问题，用DXF组码创建一条多段线<br/>长度=50 宽度=0.5 起点X=-6 Y=1.5 终点X=-1 Y=1.5<br/>（谢谢各位了）</font><br/></p><img src="http://user.qzone.qq.com/640244434/photo/326885683/MwxqxM10.kxlm7Kj6M2cLwuHOiwNgIAAAA!!/" border="0" alt=""/>

asdfxx 发表于 2009-9-4 12:47:00

tanle2020 发表于 2009-9-4 17:28:00

<p>非常感谢<font face="Verdana" color="#000000">asdfxx大哥的解答</font></p><p><font face="Verdana" color="#000000">我用上面的那段组码创建出来的多段线为什么起点宽度是0</font></p><p><font face="Verdana">还请大哥帮我看一下这个创建图块程序问题何在</font></p><p><font face="Verdana">(defun c:qq() <br/>(tblsearch "BLOCK" "TL-11")<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; (progn<br/>&nbsp;(entmake<br/>&nbsp;&nbsp; '((0 . "block")<br/>&nbsp;&nbsp;&nbsp;&nbsp; (2 . "TL-11")<br/>&nbsp;&nbsp;&nbsp;&nbsp; (70 . 0)<br/>&nbsp;&nbsp;&nbsp;&nbsp; (10 0.0 0.0 0.0)<br/>&nbsp;&nbsp;&nbsp; )<br/>&nbsp;)<br/>&nbsp;<br/>&nbsp;(EntMake <br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; (list<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(0 . "LWPOLYLINE")<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(100 . "AcDbEntity") <br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(8 . "0")<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(100 . "AcDbPolyline")<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(90 . 2)<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(70 . 0)<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; (list 10 -6 1.5) <br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(40 . 0.0)<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(41 . 0.5) <br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(42 . 0.0) <br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; (list 10 -1 1.5)<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(40 . 0.0)<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(41 . 0.0) <br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '(42 . 0.5) <br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; )<br/>&nbsp;&nbsp;&nbsp;&nbsp; ) <br/>&nbsp;<br/>&nbsp;(entmake '((0 . "ENDBLK")))<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; )<br/>&nbsp; )</font></p>

ZZXXQQ 发表于 2009-9-4 20:58:00

(entmake<br/>&nbsp;'((0 . "LWPOLYLINE")<br/>&nbsp;&nbsp; (100 . "AcDbEntity")<br/>&nbsp;&nbsp; (8 . "0")<br/>&nbsp;&nbsp; (100 . "AcDbPolyline")<br/>&nbsp;&nbsp; (90 . 2)<br/>&nbsp;&nbsp; (70 . 0)<br/>&nbsp;&nbsp; (43 . 0.5)<br/>&nbsp;&nbsp; (38 . 0.0)<br/>&nbsp;&nbsp; (39 . 0.0)<br/>&nbsp;&nbsp; (10 -6 1.5)<br/>&nbsp;&nbsp; (40 . 0.5)<br/>&nbsp;&nbsp; (41 . 0.5)<br/>&nbsp;&nbsp; (42 . 0.0)<br/>&nbsp;&nbsp; (10 -1 1.5)<br/>&nbsp;&nbsp; (40 . 0.5)<br/>&nbsp;&nbsp; (41 . 0.5)<br/>&nbsp;&nbsp; (42 . 0.0)<br/>&nbsp; )<br/>)

tanle2020 发表于 2009-9-5 08:27:00

非常感谢<strong><font face="Verdana" color="#da2549">ZZXXQQ斑竹、 <font color="#61b713">asdfxx </font><font color="#000000">的帮忙，小弟的问题以得到解决，你们的热心小弟会永记。</font></font></strong>

muwind 发表于 2009-9-6 01:27:00

<p>其实你可以画一条任意的多段线， 用ENTGET 得到DXF组码 看一下就知道了...</p>
页: [1]
查看完整版本: [求助]帮小弟解决一个很小的问题（谢谢）