DCL执行程序on按钮
我正在构建一个用于一次插入多个块的 DCL 接口。我有一个核心 DCL 窗口,您可以在其中选择要插入的内容。这些按钮弹出一个新窗口,在其中输入特定信息以选择每个插入。最后,应该运行代码来处理输入的信息并且用户选择插入点。
我相信是(getpoint)函数造成了麻烦。我找到了一个如何通过隐藏对话框来执行此操作的示例,但我想关闭它。本质上,我希望代码的 DCL 组件在运行插入函数之前完全完成。
有人知道方法吗?或者给我一点思路,或者成品解决方案或资源,谢谢!
我不确定这是否是最好的方法,我倾向于使用动态创建它们的 DCL 方法(我认为 Lee Mac 有这样的例子),所以 DCL 编码是 LISP 例程和文件的一部分。如果您有单独的 DCL 文件,不确定这是否有效,但它应该有效。
您可以使用 action_tile 向变量添加值,例如
(action_tile "DoingThis" "(setq DoneThis \"Yes\")" ) 注意字符串,您需要在 Action_tile " "s 中使用 \" 组合。也可以构建列表等
您可以在此处添加几个变量
(action_tile "DoingThis" "(setq DoneThis \"Yes\") (setq ANumber 123456)" )
以及一个函数action_tile
当您单击 DCL 上的 OK 按钮时,该框会关闭,但调用它的 LISP 会继续运行,因此您可以将所有用户输入的数据保存为变量,根据需要完成并关闭 DCL,然后使用 getpoint 从那里。
试试看,我编的这些。
这仅适用于确定按钮吗?
当我尝试在命令中关闭 dcl 时,我会将 unload_dialog 和 MyFunction 都放在 action tile 字段中。这导致我收到错误(见附件)。
页:
[1]