标高标注程序

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

感谢楼主分享

账号		自动登录	找回密码
密码			注册

[源码] 标高标注程序

本帖子中包含更多资源

浏览过的版块