如何创建Lisp对话框？

Guest balajibth · 发表于 2022-7-6 10:15:51

海在这里巴拉吉。。。实际上，我们正在使用更多的Lisp。。。。我提到的命令（我将准备命令详细信息）我想通过对话框显示。。只要我输入一个命令意味着一个对话框需要显示我提到的所有细节。。。
例：一个记事本，我将创建我的lisp详细命令。。。在放置lisp之后，我正在提供帮助，这意味着我给定的命令（记事本数据）需要用大对话框显示。。。请参见以下提及的详细信息：

选定的要素图层更改为Dim图层-“dd”
选定的要素层更改为5H层-“5H”
选定的要素层更改为4H层-“4H”
选定的要素层更改为4C层-“4C”
选定的要素层更改为5C层-“5C”
选定的要素层更改为1C层-“1C”
选定的要素层更改为虚拟层-“pp”
选定的要素层更改为T1层-“T1”
所选要素层更改为T2层-“T2”
选定的要素图层更改为TXT图层-“TXT”
对于层检查-“Lc”
在点处中断-“在”
交叉路口中断-“ib”
根据线条角度“roo”更改文字角度
所选功能将颜色更改为红色-“rr”
所选功能将颜色更改为黄色-“yy”
所选功能将颜色更改为ByLayer-“bb”
将固定大小的圆放置到0（零）层-“1”
对于文本导出-“te”
对于小数位数更改-“de”
用于偏移2条选定线之间的线-“2L”

当我有疑问，我想分类与帮助对话框，而我想。。。如何创建该对话框？？？？你能帮助我吗。。。Bcoz我们正在使用如此多的lisp。。虽然我们当时有疑问，但我们将使用此帮助对话框选项。。。。

ReMark · 发表于 2022-7-6 10:20:21

我认为您需要编写一个DCL文件来定义一个对话框。我可能错了。

BlackBox · 发表于 2022-7-6 10:22:51

假设OP正在使用LISP编写代码。。。这是正确的。

注意-如果使用其他语言编写代码。。。VBA或C#。NET（例如），可以分别使用VBAIDE或Visual Studio来开发其对话框。可能有一种跨语言支持的方法（即使用VBAIDE表单和LISP），但我不确定如何实现这一点。

希望这有帮助！

Lt Dan's l · 发表于 2022-7-6 10:28:29

我喜欢这个网站
http://web2.airmail.net/terrycad/Tutorials/MyDialogs.htm

Guest balajibth · 发表于 2022-7-6 10:31:36

我已经看到了这个链接。。我认为它非常有用。。。。我想要一个帮助。。。你能告诉hw创建DCl吗？？？？
我想显示的对话框下面提到的信息意味着在该链接中的代码是可用的？？？？我试过一个，但不管用。。。。

选定的要素图层更改为Dim图层-“dd”
选定的要素层更改为5H层-“5H”
选定的要素层更改为4H层-“4H”
选定的要素层更改为4C层-“4C”
选定的要素层更改为5C层-“5C”
选定的要素层更改为1C层-“1C”
选定的要素层更改为虚拟层-“pp”
选定的要素层更改为T1层-“T1”
所选要素层更改为T2层-“T2”
选定的要素图层更改为TXT图层-“TXT”
对于层检查-“Lc”
在点处中断-“在”
交叉路口中断-“ib”
根据线条角度“roo”更改文字角度
所选功能将颜色更改为红色-“rr”
所选功能将颜色更改为黄色-“yy”
所选功能将颜色更改为ByLayer-“bb”
将固定大小的圆放置到0（零）层-“1”
对于文本导出-“te”
对于小数位数更改-“de”
用于偏移2条选定线之间的线-“2L”

提前感谢。。。。

rkmcswain · 发表于 2022-7-6 10:32:11

该链接包含有关如何创建DCL文件以及如何使用autolisp控制这些文件的信息。
AutoCAD附带的帮助文件也包含此信息。
另一个位置=http://www.afralisp.net/dialog-control-language/tutorials/index.php?category_id=12

Lt Dan's l · 发表于 2022-7-6 10:37:59

你在找警报吗？？

例子：

copy

 
(defun c:test nil
 (alert 
   (strcat "Hello " (getvar 'loginname) 
           "\n\n*Some useless info*\nProfile name: " 
           (getvar 'cprofile) " \nDwg Name: " (getvar 'dwgname) 
           "\nIs this what you're looking for?"
   )
 )
 (princ)
)

Guest balajibth · 发表于 2022-7-6 10:39:35

海丹的雅这段代码只有我期待…非常感谢…那么我如何才能添加我下面提到的命令行到这段代码？？？Plz的样本只是添加2行。。。。

选定的要素图层更改为Dim图层-“dd”
选定的要素层更改为5H层-“5H”
选定的要素层更改为4H层-“4H”
选定的要素层更改为4C层-“4C”
选定的要素层更改为5C层-“5C”
选定的要素层更改为1C层-“1C”
选定的要素层更改为虚拟层-“pp”
选定的要素层更改为T1层-“T1”
所选要素层更改为T2层-“T2”
选定的要素图层更改为TXT图层-“TXT”

提前感谢。。。。。。。。。

Guest balajibth · 发表于 2022-7-6 10:41:26

在命令*一些无用的信息*后，这一行将进入该对话框。。那么hw要删除这条线吗？？？？？配置文件名的意思是什么？？Bcoz其显示的未命名配置文件。。。。。我们想在这里提及什么（档案名称）？

Guest balajibth · 发表于 2022-7-6 10:45:45

在一行一行地添加了它的非未来。。。。它就像一个连续的段落。。。。我想显示下面提到的像一行一行。。。

对于样品：
选定的要素图层更改为Dim图层-“dd”
选定的要素层更改为5H层-“5H”
选定的要素层更改为4H层-“4H”

[编程交流] 如何创建Lisp对话框？

发表回复

精选推荐