Autolisp处理DCL的地方哪里错了

siyo

龙龙仔发表于2003-12-17 8:25:00;;每次輸入都要檢查輸入是否正確資料
(action_tile "x_pt" "(setq x_pt (bmk_check_real (distof (get_tile $key)) $key))")

(defun BMK_CHECK_REAL (REAL_NUMBER C

我们要判断的不是编辑框的数值吗?
是不是应该用$value


(action_tile "x_pt" "(setq x_pt (bmk_check_real (distof (get_tile $value)) $key))")

(defun BMK_CHECK_REAL (REAL_NUMBER COORD)
  ...............
)

meflying

这里的(get_tile $key)返回的就是key控件的$value，由于你检查的不是这个动作控件的$value，所以要用(get_tile $key)这里的KEY就是你要检查的控件

按你说的(get_tile $value)将会导致错误