请教:错误: 每次加栽都出现quit / exit abort,连"HELLO WORLD"都----
每次使用.lsp文件都出错,我用"HELLO WORLD "这个简单程序也出错,请诸位帮忙.谢谢!!!! 你不貼出來別人又怎麼知你的程序是哪里出錯的? ;; Filename : test2.lsp
(defun c:test (/ dcl_id)
(setq dcl_id (load_dialog "test1.dcl"));
(if (not (new_dialog "hello" dcl_id)) ;
(exit)
)
(start_dialog) ;
(princ) ;
)
不好意思,我是新手,刚开始学习VLISP 你没有TEST1.DCL,或者这个文件不在CAD的搜索路径 你定义的是TEXT2.DCL而程序中用的是test1.dcl你改成(setq dcl_id (load_dialog "test2.dcl")) 试一下 你在调试中最好把(setq dcl_id (load_dialog "<font color="#f70968">test1.dcl</font>"))给成绝对路径。 <p>我也遇到这个问题了</p> 1)调用函数 load_dialogDCL 文件加载入内存,并获得标识码dcl_id。
(setq dcl_id (load_dialog "F:/dia.dcl")); 注意符号“/ ”
2)调用 new_dialog
(new_dialog dlgname dcl_id ])
dlgname 参数是用于指定对话框的一个字符串,而 dcl_id 参数用于指定 DCL 文件(必须先调用 load_dialog 函数获取其值)。
screen-pt 参数是一个二维点表,它用于指定对话框在屏幕上的位置的 X、Y 坐标。该点通常指定的是对话框的左上角,但它还与平台有关,其值通常用系统单位来表示。如果将其指定为 '(-1 -1),那么打开对话框时它会显示在缺省位置上(即 AutoCAD 的图形屏幕的中心位置)。
如果指定了 screen-pt 参数,就必须指定 action 参数。action 参数是一个字符串,它包含了用来表示缺省动作的一个 AutoLISP 表达式。如果不想定义缺省动作,可以传给 action 参数一个空字符串 ("")。
如果 new_dialog 函数调用成功,它返回 T;否则它返回 nil。
在调用 new_dialog 失败时,调用 start_dialog会导致不可预知的结果。因此必须
检查 new_dialog 的返回值。
(if (not (new_dialog "dia1" dcl_id1))(exit)) ;检查语句示例
3) 若 new_dialog 的返回不是 nil,则调用 start_dialog 来控制 AutoCAD 和用户之间的交互操作。start_dialog 函数显示对话框并接受用户输入。start_dialog 函数不需要参数。
(start_dialog)
页:
[1]