请教OPENDCL 按回车（空格）执行上次命令

cheng5276

在CAD中一般按回车（空格），继续执行前次的命令
我们用 lisp 定义的命令，也能被执行！
既然普通LISP 和OPENDCL的命令都是C:开头来定义的，
但为何用我们点击 OPENDCL的按钮所执行的命令却不能通过回车或空格，来继续执行呢？
请高手们提点提点。
(defun c:JM_Form2_tkth_OnClicked (/) ;这个就是基本的OPENDCL的按钮单击的启动函数
(c:Kth)
)

ycyccc

同求解答。。这个问题查资料很久了，一直没找到解决方法。

njcknfy

做一个单击按钮,按钮指向的程序调用相应的LISP函数,可以这样写

2. ;;;点击图层恢复后打开所有图层
   
3. (defun c:DLGSX_LS2009FORM_OPENALLLAYER_OnClicked  (/)
   
4.   (dcl_sendstring (strcat "openalllay" "\n"))
   
5. ;;;(c:openalllay)
   
6.   )

;;;点击图层恢复后打开所有图层<br /> (defun c:DLGSX_LS2009FORM_OPENALLLAYER_OnClicked  (/)<br />   (dcl_sendstring (strcat "openalllay" "\n"))<br /> ;;;(c:openalllay)<br />   )

cheng5276

多谢打下指点！帮了我个大忙啊

happyboy75

谢谢

yewuqiang

这个问题也困扰了我很久了

i小小白i

留个脚印，回头试试

jh3030912

收藏一下看看