带默认值的initget和getkword
大家好！需要一点帮助。我想知道如果我的输入由initget和getkword控制，是否可能有一个“默认值”。有人有主意吗？
以下是不工作的示例代码：
(defun c:dvtest ()
(or dvdia (setq dvdia "8")); set global variable
(initget "8 10 12 16 20 25 32 40");valid inputs
(if (/= "" (setq strdia(getkword(strcat "\nEnter Bar Diameter <" dvdia "> "))))
(setq dvdia strdia)
)
(princ "\nThe Bar diameter is ")
(princ dvdia)
(princ)
)
下面是示例代码，其中输入不受initget和getkword的限制，但有效：
(defun c:dvtest2 ()
(or dvdia (setq dvdia "8")); set global variables
(if (/= "" (setq strdia(getstring(strcat "\nEnter Bar Diameter <" dvdia "> "))))
(setq dvdia strdia)
)
(princ "\nThe Bar diameter is ")
(princ dvdia)
(princ)
) 请检查此线程。
当做 我懂了。这是一个快速的反应。
接下来的问题是，在您的示例代码中，我们可以包括默认值（prevoius selection）吗。试着用MLEADER命令，你就会明白我的意思了。
tnx。 只需从上面建议的线程中检查第7个帖子。在发现该线程（更适合您的问题）后，我已从帖子中删除了代码示例。
当做 完美的这正是我想要的。
下一次，在我在这里发帖之前，我会先尝试搜索这样的线程是否已经存在。
谢谢！ 不客气！一个尖端，检查螺纹底部的类似螺纹表。
当做
页:
[1]