lucas_3333 发表于 2015-9-28 21:02 static/image/common/back.gif
难道你试过？不成功？ ，贴出你的代码。。。
“楼主,你具体想干嘛? 你是想获取"单联单控开关" 或"三联单控开" 下的所有对象集合?”
正是此意啊
本帖最后由 菜卷鱼 于 2015-9-29 08:39 编辑
发一个动态属性块的动态属性控制源码
http://bbs.mjtd.com/forum.php?mo ... 2096&fromuid=399892
(DynamicValueCtrl (car(entsel)) "设备名称" "单联单控开关")
之前搞了好久才搞出来的，你一定要请我吃个饭，但是，我发那个帖子的时候你是沙发诶！！！！
没有看9楼吗? 给出思路了,你不按套路走, 那也没办法了 ,你说不行,你就贴出你不行的代码,
你要是这样下去等别人给你写代码, 那此贴可以结了!
代码里面都有啊！里面有获得动态属性名称，属性参数，根据这两个你可以反推啊
lucas_3333 发表于 2015-9-29 08:49 static/image/common/back.gif
没有看9楼吗? 给出思路了,你不按套路走, 那也没办法了 ,你说不行,你就贴出你不行的代码,
你要是这样下去等 ...
一、首先，应你的要求，代码贴到下面。不过我想好奇一下，都玩到动态块的人，还有没用过entnext循环或者vlax-for遍历的？
二、然后非常感谢你还能一直在关注此帖，但是如果你会并且愿意帮我，那我感谢你，不愿意呢，也没人会逼着你。
三、你说的思路，提问之前早就尝试过了，而你在自己并没实践过的情况下就去怀疑别人，是不是有点太自以为是了呢？
四、不知道你是从哪儿看出来，我就是来等代码的，至于结不结帖，该不该结贴，要不要结贴，你急什么呢？(defun getenlst(blkname / en enlst)
(setq enlst (list (cdr (assoc -2 (tblsearch "block" blkname)))))
(while (setq en (entnext (car enlst)))
(setq enlst (cons en enlst))
)
enlst
)(defun getenlst(en / lst)
(vlax-for x
(vla-item (vla-get-Blocks (vla-get-ActiveDocument (vlax-get-acad-object)))
(Vlax-Get (vlax-ename->vla-object en)"Name"))
(setq lst (cons (vlax-vla-object->ename x) lst))
)
lst
)
伪书虫86 发表于 2015-9-29 09:26 static/image/common/back.gif
一、首先，应你的要求，代码贴到下面。不过我想好奇一下，都玩到动态块的人，还有没用过entnext循环或者v ...
没码就不叫讨论 , 我说的结贴意思是如果不上码,估计没人会来给你建议. ...
10点钟要去出差 ,当然放假前如果有时间 ,我会看看的.
希望你好运!
菜卷鱼 发表于 2015-9-29 08:55 static/image/common/back.gif
代码里面都有啊！里面有获得动态属性名称，属性参数，根据这两个你可以反推啊
兄弟，你还是没理解我的意思，额，这么说吧，比如我一个动态块里所有的图元（直线啊圆啊之类的）一共是10个，其中某一个可见性状态下，用到的图元肯定是小于等于10，比如说“可见性状态A”用了其中的3个图元，“可见性状态B”用了其中的5个图元，……而我现在想获取的就是“可见性状态A”的这三个图元。
我查过了跟动态块有关的函数，没看到这个功能的，我猜想的是应该藏在哪个组码里或者什么地方，不过应该是跟图块绑在一起的。
伪书虫86 发表于 2015-9-29 09:46 static/image/common/back.gif
兄弟，你还是没理解我的意思，额，这么说吧，比如我一个动态块里所有的图元（直线啊圆啊之类的）一共是10 ...
另外一个疑问, 获取这些图元后, 你用来干什么?
一个偷鸡的做法是在0,0,0点以缺省参数插入图块，分别设置可见性并炸开，这样可以得到的分解的实体列表，然后以此表对照块定义的所有实体列表，对应后标记。
不过可能同一实体在多个可见性中均可见，也实在想不出构造一个这样的单一可见性实体选择集有何用处。
确实不知道或则这个集合用途何在，希望楼主能谈谈？
讨论一下也好，这个帖子都招来好几个大神了哈