结束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))(而(
您需要使用getpoint调用来代替MLEADER命令期间的暂停,然而,使用这种方法很不幸也会放弃MLEADER命令提供的动态预览。
李 谢谢李。但这不是我所希望的答案。我认为有一些类似于你用来做工具栏按钮的东西。我不知道我为什么能在我写的代码中做到这一点,但这篇文章中的代码表现不同。
页:
[1]