[求助]怎么提示 参数太少
 

[求助]怎么提示 参数太少
www.dimcax.com
[求助]怎么提示 参数太少
dcl;
c_add:dialog {
label="加法器";
:text {
label="先输入数据，然后单击等号";
}
:edit_box {
label="加数";
key="add_number";
edit_limit=20;
edit_width=5;
}
:edit_box {
label="被加数";
key="added_number";
edit_limit=20;
edit_width=5;
}
:boxed_row{
label="结果";
:button{
label="=";
key="=";
fixed_width=true;
width=3;
}
:edit_box{
key="geted_number";
edit_limit=20;
edit_width=5;
}
}
ok_cancel;
}
程序；
(defun c:load_add(/dcl_id)
(setq dcl_id(load_dialog "c_add.dcl"))
(if(not(new_dialog"c_add" dcl_id))(exit))
(ation_tile "=""(calculate)");当单击"="号时，调用calculate进行计算
(start_dialog)
(unload_dialog dcl_id)
(princ)
)
(defun calculate()
(setq a (atof(get_title"add_number")))
(setq b (atof(get_title"added_number")))
(setq c (+ a b))
(setq f (rtos c 2 4))
(set_tile "geted_number" f)
)

总是提示参数太少 请高手指点
d
~ ~
另外还有 能不用调用（load_dialog）把lisp 文件和dcl文件放置在一个文件里么？
贱人工具箱好像就是这样的~ ~
请高手指点
d
请使用winrar软件打开rar压缩文件。
用vlisp编辑器打开lsp源程序,如果是系统里的函数,那默认应该是蓝色显示的,黑色显示的函数如果是黑色的,而且又不是自定义的函数,那就是拼写有误,比如"get_title"就不是系统lisp函数.
想让lsp和dcl在一个文件中,需要编译一个vlx文件,步骤:vlisp->文件->生成应用程序->新建应用程序向导->专家->指定工程的位置和名称->在需要包含的lisp对话框中加入lsp文件->在需要包含的资源对话框中加入dcl文件->下一步...->完成. 生成的vlx文件中就包含了lsp的编译文件和dcl资源文件. 这个vlx文件给用户就可以了.
change your life style.
d
~ ~
谢谢
你真的很细心~ ~
d
支持！！
支持你，王咣生！！
d