社区 › Auto Lisp › DCL和Lisp的帮助

BIGAL 发表于 2022-7-5 17:09:53

我很幸运，有一份Autocad 12版（非2012年版）帮助手册，其中包含了执行dcl的所有示例代码
这在Autocad帮助中仍然可用，但您必须找到它。一旦你知道你想要什么，这并不难，我有dcl和子dcl是的，你可以调用另一个dcl级别，它们有类似滑块的东西，所以你可以拖动来获得所需的答案。
 
从这里开始https://knowledge.autodesk.com/support/autocad-civil-3d/learn-explore/caas/CloudHelp/cloudhelp/2018/ENU/AutoCAD-AutoLISP/files/GUID-E10AFB89-89BF-4616-819A-439BAEAAD0B9-htm.html
 
如果您发布了希望dcl外观的dwg，我们可能会提供帮助。

prodromosm 发表于 2022-7-5 17:14:57

我是如何硬编码DCL代码的？有什么程序可以做到这一点吗？

prodromosm 发表于 2022-7-5 17:20:10

您好，Grrr。我想问你一个问题。如果我知道所有DCL文件都是硬编码的。如果我想在同一个项目中添加一些其他交点，并且有4条线和5行是不可能的？

BIGAL 发表于 2022-7-5 17:23:13

是的，我有幻灯片2x2 3x2 4x4等的默认dcl，这只是添加更多行和列的情况。在下面的示例中，每个图像都有一个键ID，如“33sq1”，图像以列表形式提供（“slide1”“slide2”…）通过lisp使用33sq+x，其中x从1开始，重复填充图像。这是作为库例程完成的，因此可以与任何程序一起工作，为拾取的正方形返回一些值。我将尝试找到正确的代码来在家中调用dcl its。
 

//DD3x3 dialogue.Used by DD3x3.lsp.
//By Alan H 1990.
dd3x3 : dialog {
label      = "Please choose item";
: column {
   : row {
   : image_button {
       key          = "33sq1";
       width      = 10;
       aspect_ratio = 1.0;
       color      = 0;
       allow_accept = true;
   }
   : image_button {
       key          = "33sq2";
       width      = 10;
       aspect_ratio = 1.0;
       color      = 0;
       allow_accept = true;
   }
   : image_button {
       key          = "33sq3";
       width      = 10;
       aspect_ratio = 1.0;
       color      = 0;
       allow_accept = true;
   }
   }
   : row {
   : image_button {
       key          = "33sq4";
       width      = 10;
       aspect_ratio = 1.0;
       color      = 0;
       allow_accept = true;
   }
   : image_button {
       key          = "33sq5";
       width      = 10;
       aspect_ratio = 1.0;
       color      = 0;
       allow_accept = true;
   }
   : image_button {
       key          = "33sq6";
       width      = 10;
       aspect_ratio = 1.0;
       color      = 0;
       allow_accept = true;
   }
   }
   : row {
   : image_button {
       key          = "33sq7";
       width      = 10;
       aspect_ratio = 1.0;
       color      = 0;
       allow_accept = true;
   }
   : image_button {
       key          = "33sq8";
       width      = 10;
       aspect_ratio = 1.0;
       color      = 0;
       allow_accept = true;
   }
   : image_button {
       key          = "33sq9";
       width      = 10;
       aspect_ratio = 1.0;
       color      = 0;
       allow_accept = true;
   }
   }
}
ok_cancel;
}

查看完整版本: DCL和Lisp的帮助