[求助]使用lisp中编组可选择

carrot1983

05625lcc发表于2008-2-14 8:29:00终于等到高手来了!万分感谢!39732这是我要写的一个程序,目的是方便机械装配图中的标号,即用引线标注各零件的名称,在零件的可见表面上指引线的端点打一小圆点.我要把生成的对象编组.但如果先前的

四楼已经把你的要回答出来了。。呵呵不知道楼主在想什么。。。vla里面对于编组对象，我没有看到“可选择的”方法或特性。。乖乖地用command

dinosaurhxe2

同楼上问

sailorcwx

先创建，后修改

05625lcc

先创建后修改是不行的(我用ACAD2006)

先创建编组1.

Command: -group
Enter a group option
[?/Order/Add/Remove/Explode/REName/Selectable/Create] <Create>: S

Enter a group name or [?]: 1

This group is not selectable. do you want to change it [Yes/No]? <Y>

程序怎么判断这句话呢?This group is not selectable

carrot1983

用8楼的，院长的“群组选择性标志”

   (setq s1 (xyp-get-dxf 330 (car (entsel))))
   (if (= (xyp-get-dxf 71 s1) 1)
     (xyp-SUBUPD s1 71 0)
     (xyp-SUBUPD s1 71 1)
   )

如果没猜错。是取得组码 330的图元，进而得到组码71的值，

这个就是楼主要的。。。