[LISP程序]：请教高手. 自动标注尺寸的函数是什么?

zhaozhi · 发表于 2003-8-18 00:34:40

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

请教高手. 自动标注尺寸的函数是什么?

eachy · 发表于 2003-8-18 00:57:29

最初由 zhaozhi 发布
[B]请教高手. 自动标注尺寸的函数是什么? [/B]

怎么个自动法？

前生 · 发表于 2003-8-18 08:28:53

(setq doc (vla-get-activeDocument (vlax-get-acad-object)))
(setq mspace (vla-get-modelSpace doc))
(setq pt1 (vlax-3d-point (setq pt (getpoint "Definition point: "))))
(setq pt2 (vlax-3d-point (getpoint "Leader end point: " pt)))
(initget "X-axis Y-axis")
(setq quest (getkword "Y-axis/<X-axis>: "))
(if (/= quest "Y-axis")(setq axis :vlax-true)(setq axis :vlax-false))
(vla-addDimOrdinate mspace pt1 pt2 axis)

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

[LISP程序]：请教高手. 自动标注尺寸的函数是什么?

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

Re: [LISP程序]：请教高手. 自动标注尺寸的函数是什么?

浏览过的版块