在LISP中,如何才能正确调用text命令?!
<p>调用CAD的text命令时,有时会出现要求输入文字高度的选项,有时就不会,请教各位是怎么回事?!</p><p>如图一和图二的比较:</p><p> </p> <p>不要求高度时,是当前字型已经设置了字高。</p><p>所以要先判断当前字型是否设置了字高,然后执行相应的命令。</p><p>(if (> (cdr(assoc 40 (tblsearch "STYLE" (getvar "TEXTSTYLE")))) 0.0)<br/> (command "TEXT" pt h "" "text")<br/> (command "TEXT" pt "" "text")<br/>)</p> <p>entmake,比command方便</p> 在TEXT中LISP 中要二个空格才行的,多一个空格 6666666666666
页:
[1]