请论坛大佬帮看下这个贱人快捷键问题

薄荷微光

贱人工具箱5.8可以设置自定义快捷键命令，请问下这个是什么原理实现的呢

飞雪神光

1. (eval (read (strcat "(defun c:" a "()(c:" b "))")))

(eval (read (strcat "(defun c:" a "()(c:" b "))")))

简单的就这样  高级点的用 vla-sendcommand

tryhi

(defun c:a ()(c:b))
这样不就行了