cheng5276 发表于 2011-11-6 23:46:26

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

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

ycyccc 发表于 2012-3-28 17:10:00

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

njcknfy 发表于 2012-8-12 01:06:41

做一个单击按钮,按钮指向的程序调用相应的LISP函数,可以这样写;;;点击图层恢复后打开所有图层
(defun c:DLGSX_LS2009FORM_OPENALLLAYER_OnClicked(/)
(dcl_sendstring (strcat "openalllay" "\n"))
;;;(c:openalllay)
)

cheng5276 发表于 2012-8-12 21:25:55

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

happyboy75 发表于 2012-11-18 13:49:12

谢谢

yewuqiang 发表于 2013-1-3 16:49:16

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

i小小白i 发表于 2024-8-9 23:26:49

留个脚印，回头试试

jh3030912 发表于 2024-8-10 04:49:47

收藏一下看看
页: [1]
查看完整版本: 请教OPENDCL 按回车（空格）执行上次命令