社区 › AutoLISP/Visual LISP 编程技术 › 当年研究 “组” group 的手稿，有部分是网上资料，已注明

jackynine 发表于 2011-6-20 11:21:34

这方面的资料较少用到

soly2006 发表于 2012-3-24 14:54:19

必须顶起来！

198526 发表于 2012-3-24 17:54:22

狂刀的东西都要好好研究研究

cable2004 发表于 2012-4-27 14:51:54

有时间好好研究下！谢谢楼主分享

smartstar 发表于 2012-4-27 20:34:22

有时间研究一下。

libo2000 发表于 2012-10-28 18:32:49

如何将某图元从组中删除？
(command "group" "r")非常的慢

xiabin68 发表于 2012-10-28 18:36:00

收藏了，，，楼主是高手啊，，，，

自贡黄明儒 发表于 2012-10-28 21:18:54

收藏了,狂刀的东西都要好好研究

libo2000 发表于 2012-11-3 14:01:20

;组定义添加实体.
(defun c:gpadd ()
(setq doc (vla-get-activedocument(vlax-get-acad-object))
                                gp(entsel "\n选择要添加实体的组:")
        )
(vlax-for obj (vla-get-activeselectionset doc)
                (vla-get-groups doc)
    (vla-delete obj)
)
)
================
这个函数明显错误，请问正确代码是？

自贡黄明儒 发表于 2012-11-3 20:36:22

本帖最后由 自贡黄明儒 于 2012-11-3 20:36 编辑

;组定义添加实体.
(defun c:gpadd ()
(setq doc (vla-get-activedocument(vlax-get-acad-object))
gp(entsel "\n选择要添加实体的组:")
(vlax-for obj (vla-get-activeselectionset doc)(vla-get-groups doc)
    (vla-delete obj)
)
)
;;这一个是不是有错误？

查看完整版本: 当年研究 “组” group 的手稿，有部分是网上资料，已注明