通过选择clo执行阵列
您好，我想在一个特定对象的区域中创建一个数组“多段线，矩形”我想知道我需要使用什么函数来实现我想要的。
提前感谢您的帮助！
干杯和啤酒！ 选择一个对象并使用lisp创建填充它的数组非常容易，你还需要选择控制数组开始的控制点，但你还需要选择一个覆盖整个对象的窗口，这样你的控制点就可以正确地移动到左下角，然后有两个选择删除外部的所有对象，修剪到对象删除接触的对象。
发布图片等以获取更多帮助。
查找“Cookiecutter.lsp” [附件]32354
嗨，比格尔，
非常感谢您的帮助。我将链接一张图片来帮助您解决问题，以及随之而来的日常事务
代码如下：
;******************************************************
; ce sous program permet de créer un
; cadre d'echafaudage
;******************************************************
(defun cadre()
(setq pt1(getpoint"\nPointez premier point : "))
(setq pt2(polar pt1 0 1220))
(setq pt3(list(car pt2)(+(cadr pt1) 2135)))
(command"_layer" "_n" "-LU CADRE" "_c" "5" "-LU CADRE" "")
(command"_donut" "0" "150" pt1 "")
(setq cir1(entlast))
(command"_donut" "0" "150" pt2 "")
(setq cir2(entlast))
(command"_pline" pt1 pt2 "")
(setq lin1(entlast))
(Command"_chprop" cir1 cir2 lin1 "" "la" "-LU CADRE" "")
(command"_block" "lu blockt" pt1 cir1 cir2 lin1 "")
(command"_insert" "lu blockt" pt1 "" "" "")
(setq blockt(entlast))
)defun cadre
;******************************************************
; début du program : échafaudage
; ce program permet d'échafauder un projet
;******************************************************
(defun c:ecf()
(setq Obj-1(entsel "\nChoisir le Contour de la dalle : "))
;(constantes)
;(spécification)
;(calcul)
(cadre)
(command"_Pline" pt1 pt3 "")
(setq lin2(entlast))
(command"_chprop" lin2 "" "la" "-LU CADRE" "")
(Command"_array" blockt lin2 "" "r" "2" "2" "2135" "2440")
(princ)
);defun c:
干杯和啤酒！！ 在看了你的画之后，使用数组填充可能不是最好的方法，在这里使用它可能更好地执行第一原理，并将脚手架绘制为对象。我认为从你的要求来看，你有很多东西，而不是几个。 嗨，比格尔，
我确实有很多问题要说，但我正试图从头开始。这些只是框架。我也有梁输入，有时插孔。但正如你所说，数组也可能不是解决方案。我只是不知道我可以使用什么功能。
我也读过关于safearray的文章，但我还不够高级，无法使用这些函数。
我只想被指向正确的方向。
非常感谢您抽出时间。 这听起来像是一个程序解决方案，你仍然可以插入与数组相同的块，但正如你上面提示的那样，让程序计算出间距，在这里搜索网格程序的示例，以了解对象的多次创建。
页:
[1]