DCL文本和方框宽度

The Buzzard · 发表于 2022-7-6 12:18:16

更好的是，我添加了一个间隔。
如果需要更多或更少的空间，请调整间隔宽度的值。

BLK_INS_ERROR : dialog {
               label = "©2009 test test";
               : row {
                 : column {
                   : boxed_column {
                     label = "BLOCK NOT FOUND";
                     : paragraph {
                       : text {
                         value = "test test test test test test test test test";
                       }
                       : text {
                         value = "test test test test test test test test test";
                       }
                     }
                     : paragraph {
                       : text {
                         value = "test test test test test test test test test";
                       }
                       : text {
                         value = "test test test test test test test test test";
                       }
                       : text {
                         value = "test test test test test test test test test";
                       }
[color=red]                       : spacer {[/color]
[color=red]                         width = 30;[/color]
[color=red]                       }[/color]
                     }
                   }
                 }
               }
               : button {
                 key = "accept";
                 label = "Cancel";
                 is_default = true;
                 fixed_width = true;
                 alignment = centered;
                 is_cancel = true;
                 is_tab_stop = true;
               }
             }

The Buzzard · 发表于 2022-7-6 12:21:15

关于第二个问题：

下面是一个小程序，用于计算可以放入电缆桥架的电缆数量。它有一个输入部分和输出部分，从lisp接收值并在对话框中显示。您可以查看此程序以了解这是如何完成的。这里有一些评论可以帮助你理解发生了什么。

这个项目是几年前完成的，当时我第一次学习如何做更高级的东西。它不是很好，但是它有你需要知道的基本内容。Lisp程序的程度完全取决于你自己，但我相信你会从中找到答案。

注：
该程序的基本操作是从对话框中获取字符串值，将其转换为实数，然后进行计算，将其返回到字符串，因为对话框仅接受字符串，然后将其发送回对话框，发送到另一个具有键的文本类型互动程序。由于您已经在使用字符串，请记住，在您的案例中不需要字符串到实数和实数返回到字符串。

根据您希望如何命名键，您的对话框文件可能看起来像这样。

copy

BLK_INS_ERROR : dialog {
               label = "©2009 test test";
               : row {
                 : column {
                   : boxed_column {
                     label = "BLOCK NOT FOUND";
                     : paragraph {
                       : text {
                         key = "TEXT1";
                       }
                       : text {
                         key = "TEXT2";
                       }
                     }
                     : paragraph {
                       : text {
                         key = "TEXT3";
                       }
                       : text {
                         key = "TEXT4";
                       }
                       : text {
                         key = "TEXT5";
                       }
                       : spacer {
                         width = 30;
                       }
                     }
                   }
                 }
               }
               : button {
                 key = "accept";
                 label = "Cancel";
                 is_default = true;
                 fixed_width = true;
                 alignment = centered;
                 is_cancel = true;
                 is_tab_stop = true;
               }
             }

对话框的空白区域应返回存储在变量中的值。请注意，对话框的宽度仍然设置为间隔值，即使它显示为空白。变量值将显示在指定给它的键或平铺中。

作为lisp的一个示例，因为我不知道您的变量名：

copy

(defun BLOCK_NOT_FOUND ()
 (set_tile "TEXT1" BLOCK1)
 (set_tile "TEXT2" BLOCK2)
 (set_tile "TEXT3" BLOCK3)
 (set_tile "TEXT4" BLOCK4)
 (set_tile "TEXT5" BLOCK5))