[求助]：请教：将整张图纸中的尺寸改为英制的简单方法。

davy-liu · 发表于 2004-10-20 15:51:42

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

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

×

请教：将整张图纸中的尺寸改为英制的简单方法。

lsjjm · 发表于 2004-10-21 03:41:40

REFER TO:
[php]
(defun c:test ()
  (vl-load-com)
  (setq dd  (ssget '((0 . "DIMENSION"))))
  (setq n 0)
  (while (< n (sslength dd))
(setq obj (vlax-ename->vla-object (ssname dd n)))
(setq dv (vla-get-Measurement obj))
(vla-put-TextOverride obj (rtos (/ dv 25.4) 2 3))
(setq n (1+ n))
  )
)
[/php]

davy-liu · 发表于 2004-10-22 21:30:19

最初由 lsjjm 发布
[B]REFER TO:
[php]
(defun c:test ()
  (vl-load-com)
  (setq dd  (ssget '((0 . "DIMENSION"))))
  (setq n 0)
  (while (< n (sslength dd))
(setq obj (vlax-ename->vla-object (ssname dd n)))
(... [/B]

非常感激 lsjjm 的答复，只是请你别笑话我，我不懂编程，能否告诉我详细步骤。

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

[求助]：请教：将整张图纸中的尺寸改为英制的简单方法。

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

相关帖子

浏览过的版块