(定义c:wm(/_Attv ss mAIN pOL v);;;pBe 2014年12月;;;;;; ;;; (defun _Attv(at/a)(vl some’(lambda(a)(if(and(eq(vla get tagstring a)“POL”)(=(vla get color a)3))(vla get textstring a))(vlax invoke at“GetAttributes”)(setq main nil POL nil); 谢谢pBe,太棒了!这正是我所需要的,当设置其他颜色时效果很好。
但autocad消息框版本也是一个很好的选择=它停止了我的下一个命令(steel report)-这将是绝对完美的:
wm公司
标签6缺失-在消息框上
好啊
标签15缺失-在消息框上
好啊
(系统与HANHPCHUC早期版本相同)
如果B区不存在-我不需要消息框 是否要将“缺少的”值保存到文件中以符合该请求?
代码在11日后更新
但没有文件报告 pBe,谢谢,比我计划的要好。
我认为cca 50标签无法放入单个消息框。
非常感谢,对我来说这是一个很大的帮助。
谢谢hanhphuc。
这对你很好,很高兴能帮上忙。
不客气,阿奇瓦罗
页:
1
[2]