szx025 发表于 2016-9-28 09:43:04

h008 发表于 2016-9-27 12:56
这文件怎么会这么大？

你不是说，我到没有注意，我也不知为啥怎么大，同求高人解释一下

szx025 发表于 2016-9-28 09:44:36

h008 发表于 2016-9-27 12:56
这文件怎么会这么大？

你不是说，我到没有注意，我也不知为啥怎么大，同求高人解释一下

persuing 发表于 2016-9-28 12:55:46

代码写块操作，节选我的一段（CASS高程点块），供楼主参考：
(setq hatchobj(vla-addhatch block achatchpatterntypepredefined"solid" :vlax-true));创建填充样式
             (setq obj(vla-addcircle block (vlax-3d-point pt) 0.1));创建外环边界添加样式
             (setq outerloop(vlax-make-safearray vlax-vbobject '(0 . 0)));创建填充边界对象数组
             (vlax-safearray-fill outerloop (list obj));数组填充对象
             (vla-appendouterloop hatchobj outerloop)
             (vla-evaluate hatchobj)
             (vla-regen doc :vlax-true)

纳铭m 发表于 2016-9-29 16:43:33

试试、感谢楼主

ljm1222 发表于 2016-9-29 18:27:30

zuijingguan.com/forum.php?mod=viewthread&tid=367

lamomo 发表于 2018-3-23 11:48:28

谢谢楼主

zhenz02 发表于 2019-7-26 08:38:53


感谢楼主分享
页: 1 [2]
查看完整版本: 标高标注程序