我正在尝试构建一个非常基本的 AutoLisp 界面。我是这方面的初学者,所以在未能从头开始编写代码后,我转向正确学习 DCL。我遵循了本教程:
http://www.afralisp.net/dialog-control-language/tutorials/dialog-boxes-and-autolisp-part-1.php
我得到了同样的错误。AutoCAD 基本上退出执行该函数,就好像 dcl 文件甚至不存在一样。
我尝试将地址完全输入其中,但我认为它应该能够像将 HTML 链接到同一文件夹中的图像一样工作。
下面你有我的代码:
数据中心:
samp1 : dialog {
label = "Structural Holes";
ok_cancel;
}
语言:
(defun C:samp1()
(setq dcl_id (load_dialog "samp1.dcl"))
(if (not (new_dialog "samp1" dcl_id))
(exit)
)
(action_tile
"cancel"
"(done_dialog)(setq userclick nil)"
)
(action_tile
"accept"
"(done_dialog)(setq userclick T))"
)
(start_dialog)
(unload_dialog dcl_id)
(princ)
)
(princ)
感谢任何愿意花时间帮助我解决这个问题的人。我开始非常绝望,这是我的第一个也是唯一一个 autolisp 项目,所以我没有任何经验......
LE:请注意,dcl 文件和 lisp 文件都在同一个文件夹中,没有其他子文件夹或其他任何东西。