布局lisp（编辑帮助）
我发现这个Lisp程序。这很好。但有一点不舒服。。因为，当你从列表中选择你想要的布局时，你必须按下“OK”按钮。我想按两次（或一次）对布局的名称（不选择名称，并按确定按钮）是否可以编辑这个lisp？？。或者，也许有另一个更舒适的lisp来打开你想要的布局。。。我的Lisp程序，我需要更改…：
布局-LK。lsp 你试过了吗？ 等等，点击两次而不是一次太难了？为什么不使用屏幕底部的布局按钮呢？
我建议你去Afralisp。如果你对你想要的东西那么挑剔的话，你可以自己学习写Lisps。
首先，这个程序中有两个额外的右括号。因此，从一开始就行不通。
此外，你没有张贴dcl文件，那么有谁能帮助你。
;;;--- If a layout was selected...
(if selectedLayout
;;;--- Set the current layout
(command "layout" "set" selectedLayout)
)
)
)
)
)
我做了一些搜索，这个lisp实际上是调用布局。JefferyPSanders的lsp。通用域名格式
这是您要消除的警报吗？我注意到你的代码在两个额外括号所在的区域被修改了。
这是因为有人也删除了（progn）当它应该被保留在。
以下是JPS的代码，删除了警报，但保留了progn。
因此无需拆除支架。警报已消除。
命令语法：布局
我必须假设您提到的第二个OK是在您选择布局并单击对话框上的第一个OK后弹出的警报框。
这是您似乎已编辑的区域。
;;;--- If a layout was selected...
(if selectedLayout
(progn ;You removed this when it should have been kept in.
;;;--- Set the current layout
(command "layout" "set" selectedLayout)
;;;--- Inform the user
(alert (strcat "Current layout is --> " selectedLayout)) ; You want this removed I assume
)
)
)
)
)
这就是它应该看起来的样子。
;;;--- If the user pressed the okay button
(if(= ddiag 2)
;;;--- If a layout was selected...
(if selectedLayout
(progn
;;;--- Set the current layout
(command "layout" "set" selectedLayout)
)
)
)
)
)
布局。dcl
布局。lsp 我不懂lisp语言，我只是一个想象力丰富的普通用户。。
没问题，但无论如何都要努力。 也许可以在这里看到：
http://www.cadtutor.net/forum/showthread.php?42431-用于组织布局选项卡的TabSort实用程序 这并不难。。只是不太舒服。。我总是尽可能快地完成我的技术工作。。速度是我工作中的第二个名字。。每次我按两下-我都很讨厌。。我在土木工程专业工作。。我画了很多。。。我知道如果你画5个布局，很难理解我。。 “这是您要消除的警报吗？”是的，我做到了。。我自己。。我试着做smth。。但我不是Lisp程序的作家。。所以我想帮你。。非常感谢您的回复
页:
[1]
2