ycy970837 发表于 2009-5-17 15:08:00

[求助]修改圆的直径的LSP执行时的错误（DXF组不正确）

本帖最后由 作者 于 2009-5-17 16:46:59 编辑 <br /><br /> <p>第一次写LSP，执行时提示错误“DXF组不正确”：大帮我看看是什么原因？谢谢。</p><p></p><p></p><p>程序如下：</p><p>(DEFUN C:RRR ()<br/>(SETQ SSS(ENTSEL))<br/>(SETQ AAA(ENTGET (CAR SSS)))<br/>(SETQ BBB(ASSOC 40 AAA))<br/>(SETQ FFF(GETREAL"\n请输入新的半径："))<br/>(SETQ CCC(CONS 40 FFF))<br/>(SETQ SSS(SUBST CCC BBB SSS))<br/>(ENTMOD SSS)<br/>)</p>

lijiao 发表于 2016-10-24 14:05:50

(SETQ SSS(SUBST CCC BBB SSS))------>(SETQ SSS(SUBST CCC BBB AAA))

ycy970837 发表于 2009-5-17 16:48:00

<p>麻烦大家帮忙看看。</p><p></p>

ycy970837 发表于 2009-5-17 17:29:00

<p>自已搞定了，谢谢。</p>

zhangxin0298 发表于 2016-10-22 17:13:22

ycy970837 发表于 2009-5-17 17:29
自已搞定了，谢谢。

怎么搞定的，我也是这种问题，求教

前生 发表于 2016-10-24 12:25:53

最简单的方法是
（entdel sss）
(entmake (cond 0 "ciecle")
            (assoc 8 aaa)
            (assoc 10 aaa)
            (assoc 40 fff)
)
页: [1]
查看完整版本: [求助]修改圆的直径的LSP执行时的错误（DXF组不正确）