请教:错误: 每次加栽都出现quit / exit abort,连"HELLO WORLD"都----

blackeyes

每次使用.lsp文件都出错,我用"HELLO WORLD "这个简单程序也出错,请诸位帮忙.


              谢谢!!!!

BDYCAD

你不貼出來別人又怎麼知你的程序是哪里出錯的?

blackeyes

;; 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

meflying

你没有TEST1.DCL，或者这个文件不在CAD的搜索路径

wqlovelg1128

你定义的是TEXT2.DCL而程序中用的是test1.dcl你改成(setq dcl_id (load_dialog "test2.dcl")) 试一下

tangsong33

你在调试中最好把（setq dcl_id (load_dialog "test1.dcl"))给成绝对路径。

aipuye

我也遇到这个问题了

ZJKUSO

1）调用函数 load_dialog  DCL 文件加载入内存，并获得标识码dcl_id。
(setq dcl_id (load_dialog "F:/dia.dcl"))  ; 注意符号“/ ”
2）调用 new_dialog
(new_dialog dlgname dcl_id [action [screen-pt]])

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)