这是什么错误？

天知道

我编了一段程序，在隐藏对话框后到屏幕上取一个点，然后绘制直线，所用命令为：(setq pp (getpoint "\n输入插入点:")),后面用到(command "line" (polar pp (* 0.667 pi) dx) pp (polar pp (* 0.333 pi) (* 2 dx)) ""),报告一个错误为：错误: 参数类型错误: numberp: nil。在此前曾经报过二维/三维点之类的错误。请问这是什么错误？如何解决？

alin

Paste yout code

xjjy

;(setq pp (getpoint "\n输入插入点:"))
;(command "line" (polar pp (* 0.667 pi) dx) pp (polar pp (* 0.333 pi) (* 2 dx)) "") 这段CODE并没错，可能的是：你在跳处对话框时，DX并没有获取你设定的数值! 相关的代码应该是这样：
(Defun c:GRT ( / dcl_id what) (setq dcl_id (load_dialog "XXX"))
(setq if_next 1)
(while (= 1 if_next)
(if (not (new_dialog "YYY" dcl_id))
(exit)
) (action_tile "DX1" "(FUN1) (done_dialog 1)") ;假设你按钮对应的KEY为:DX1
(setq what (start_dialog))
(cond ((= 1 what)
(FUN2)
(setq if_next 1)
)
)
)
)
;--------------
(DEFUN FUN1()
(setq DX (atof (get_tile "DX"))) ;获取dx值的KEY为DX
)
;-----------
(DEFUN FUN2()
(setq pp (getpoint "\n输入插入点:"))
(command "line" (polar pp (* 0.667 pi) dx) pp (polar pp (* 0.333 pi) (* 2 dx)) "")
) 请多指教！谢谢！

天知道

3楼说得有道理，我已经解决了，谢谢！好地方，以后常来看看