ectech 发表于 2022-7-6 09:30:21

将图形从英寸转换为

尊敬的各位：，
 
知道如何用lisp将图形从英寸转换为毫米吗？从英寸到毫米有什么变化吗？
非常感谢各位专家！

ReMark 发表于 2022-7-6 09:36:18

你为什么不告诉我们你到底想做什么？

dbroada 发表于 2022-7-6 09:39:29

不是用Lisp程序，但你需要做的就是将所有内容按25,4的比例缩放。然后，您可能需要更改文字大小和标注样式。

LibertyOne 发表于 2022-7-6 09:42:23

我同意关于这一点的评论。
 
这真的取决于你想要完成什么。如果绘图有很多块，它可能会变得非常复杂。如果图形主要由基本几何图形（直线、圆、圆弧、多段线等）组成，则不应该出现这样的问题。
 
通常，scale命令可以很容易地帮助您完成这项任务。使用dbroda建议的系数25.4进行放大。

Dipali 发表于 2022-7-6 09:45:03

我在此帖子中发布的解决方案可能会有所帮助
http://www.cadtutor.net/forum/showth...t=44875&page=3

dbroada 发表于 2022-7-6 09:50:32

INS*变量在2004年可用吗？我以为他们是2006年来的。

eldon 发表于 2022-7-6 09:55:04

 
INSUNIT在r2002中提供

dbroada 发表于 2022-7-6 09:55:54

在这种情况下，我直到2006年才发现它们
 
（但我不认为我们有2002年）

Ahankhah 发表于 2022-7-6 10:01:24

(setvar 'Insunits 1)                              ; change drawing units to inch
;; make sure no layer is frozen and no layer is locked
(command "._BLOCK" "temp" "_NONe" '(0 0 0) "ALL" "")
                                                 ; making temporary block "temp" for all objects
(setvar 'Insunits 4)                              ; change drawing units to mm
(command "._INSERT" "temp" "_NONe" '(0 0 0) 1 1 0)
(command "._EXPLODE" "_Last")
(command "._PURGE" "_Block" "temp" "_No" )

ectech 发表于 2022-7-6 10:04:05

感谢所有专家，我的问题是我的一些CAD文件绘图单位更改为英寸而不是毫米。因此，所有的计算都会得到错误的结果。所以我想先用lisp检查绘图单位，如果绘图不等于milllimeter，我会把它改回毫米。
页: [1] 2
查看完整版本: 将图形从英寸转换为