lisp吧 关注:2,680贴子:12,838
  • 0回复贴,共1

寻求lisp输入函数的一些问题

取消只看楼主收藏回复

(defun c:shuru ()
(initget "dn15 dn20dn25 dn32")
(setq var (getkword "请输入字符串[dn15,dn20,dn25,dn32]<dn25>"))
(princ var)
(princ)
)
以上是我编写的代码,运行效果如下图。显示效果可以用鼠标选择,但实际上选择无效,结果始终是nil,必须用键盘输入才能得到正确结果
万能的吧友有谁知道是什么原因


IP属地:陕西1楼2019-07-15 16:19回复