pop159 发表于 2012-11-8 14:39:08

求助,谢谢

如何取得所选尺寸的DIMEXO值,本人没办法啦,各位大大们出手吧,谢谢.

pop159 发表于 2012-11-8 15:09:02

大大们出手吧,或修改所选尺寸的dimexo值.谢了.

vormittag 发表于 2012-11-8 15:59:35

查询可以用(cdr (assoc 42 (entget(tblobjname "dimstyle"(cdr (assoc 3 (entget(car(entsel)))))))))

zyhandw 发表于 2012-11-8 16:06:02

本帖最后由 zyhandw 于 2012-11-8 16:08 编辑

不用大大们出手，我等菜鸟先出手，你试试看能用不(defun c:test( / en x enlst en-vl)
(setq en (car (entsel)))
(setq x (getreal "\n 请输入DIMEXO的新值: \n"))
(setq enlst (entget en))
(setq en-vl (vlax-ename->vla-object en))
(vlax-put-propertyen-vl 'ExtensionLineOffset )
(entmod enlst)
)

vormittag 发表于 2012-11-8 16:07:16

如果要修改的话要用扩展数据了。

pop159 发表于 2012-11-8 17:08:23

谢谢,提示参数太少.等再次出手.

pop159 发表于 2012-11-8 17:09:53

zyhandw 发表于 2012-11-8 16:06 static/image/common/back.gif
不用大大们出手，我等菜鸟先出手，你试试看能用不

谢谢,提示参数太少.等再次出手.

zyhandw 发表于 2012-11-8 17:14:43

pop159 发表于 2012-11-8 17:09 static/image/common/back.gif
谢谢,提示参数太少.等再次出手.

sorry，漏写一个字符
(defun c:test( / en x enlst en-vl)
(setq en (car (entsel)))
(setq x (getreal "\n 请输入DIMEXO的新值: \n"))
(setq enlst (entget en))
(setq en-vl (vlax-ename->vla-object en))
(vlax-put-propertyen-vl 'ExtensionLineOffset x)
(entmod enlst)
)

pop159 发表于 2012-11-8 17:16:18

vormittag 发表于 2012-11-8 15:59 static/image/common/back.gif
查询可以用

谢谢您的帮助.

zyhandw 发表于 2012-11-8 17:16:51

没用过标注，所以也不知道是否符你的要求，不是你的要的结果的话，请向大大们求助
页: [1] 2
查看完整版本: 求助,谢谢