arthwon 发表于 2011-6-16 00:02:35

change程序无法运行?源码内详

(DEFUN C:RR ( / ss)
(PRINC "\n选择要转换的文字 ")
(SETQ    SS (SSGET (LIST      
                     '(0 . "TEXT")      
                     '(7 . "Standard")          )       ))
(command "change" ss "" "" "TSSD_Rein" "300" "")
(prin1))
以上程序运行错误信息是:

二维点无效。
; 错误: *error* 函数中出错函数被取消
指定新的文字插入点 <不修改>:
此时change程序尚未退出运行,按空格键可以继续下一步 操 作。
奇怪的是,为什么 “” 代替不了空格键?
请各位指点,谢谢。



if 发表于 2011-6-16 03:17:28

(command "change" ss "" "" "" "TSSD_Rein" "300" "")
少一个空格--------第一个空格-----结束选集

arthwon 发表于 2011-6-16 06:17:12

感谢楼上的,感激涕零啊。那么迟回复,应该是还没睡吧?要注意身体啊。

实在菜啊,原来还是缺了一个确认键而已。我以为跟实际运行的步骤相同就可以了。实际运行时确实只要两个空格确认键即可。
我接触LISP语言不多,昨天调试程序,不知道问题出在哪里,拼命找资料,看“AutoLISP编程大全”“函数参考”等想找出相关出错控制方案,未果。

crazylsp 发表于 2011-6-16 10:29:52

呵呵,调试是很令人辛苦郁闷的。
页: [1]
查看完整版本: change程序无法运行?源码内详