也创建玻璃计算

comcu · 发表于 2022-7-6 07:04:07

你好

我正在尝试编写一个visual lisp例程，允许用户在闭合矩形内选择一个点，并从中获得矩形的宽度和高度。

所以我认为可以这样做

用户选择点

创建边界

选择上次创建的项目（例如边界）

偏移所需尺寸以创建新矩形，并删除现有尺寸以获得实际玻璃尺寸（这将是一个可以在实际命令之外设置的变量）

选择新建矩形，然后从中计算新矩形/我的玻璃宽度和高度的宽度和高度。

然后将这些值作为文本插入到从btm角点开始的集合矩形的左下方，插入距离为“玻璃偏移值变量”的两倍。

重复命令，直到用户取消。

我以前做过一些VB，在VBA中有一个类似的上面的程序，但有点麻烦，我认为最好使用Vlisp，因为我知道VBA在新的autocad中不存在，但Vlisp仍然存在？

感谢您的指导/帮助。

科林