ksperopoulos 发表于 2022-7-5 23:37:42

结束Mleader命令

好啊我使用多重引线创建了我的第一个递增lisp。我试图通过按下“回车”键来添加结束功能的功能。现在,我只能通过一直走到“Z”或按“escape”键来完成程序。有人能给我指一下正确的方向吗?
(defun c:WID(/*error*weld numb)(defun*error*(msg)(if(not(member msg)(“Function cancelled”“quit/exit abort”))(princ(strcat”\error:“msg”))(princ))(initget“A B c D E F G H I K L M N O P Q R S T U V W X Y Z”)(setq weld(getkword“\N输入焊接标识字母:”)numb(ascii weld))(而(

Lee Mac 发表于 2022-7-6 00:09:17

 
您需要使用getpoint调用来代替MLEADER命令期间的暂停,然而,使用这种方法很不幸也会放弃MLEADER命令提供的动态预览。
 

ksperopoulos 发表于 2022-7-6 00:45:04

谢谢李。但这不是我所希望的答案。我认为有一些类似于你用来做工具栏按钮的东西。我不知道我为什么能在我写的代码中做到这一点,但这篇文章中的代码表现不同。
页: [1]
查看完整版本: 结束Mleader命令