关于【假尺寸】的问题

你有种再说一遍

lengxiaxi 发表于 2025-5-27 18:31
谢谢你的回复

上图的情况，不是人工手动修改数值后的尺寸

难道是三维模型本身就是错误的?所以才会导出错误?

lengxiaxi

梨子·桃 发表于 2025-5-27 18:40
langjs大佬的假尺寸检查就很好用，假尺寸变红色
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=92283 ...

不是这种情况，谢谢你的回复

图形附件，可以下载，看看有何高见，欢迎反馈

fangmin723

标注的全局比例并不影响实际标注的数值，只会改变箭头和标准文字的大小显示

1. (defun c:jcc(/ ent i lsfactor n obj oldss textstr)
   
2.   (if (setq oldss (ssget '((0 . "DIMENSION"))))
   
3.     (progn
   
4.       (setq n 0 i -1)
   
5.       (while (setq ent (ssname oldss (setq i (1+ i))))
   
6.         (setq
   
7.           obj (vlax-ename->vla-object ent)
   
8.           textstr (vla-get-TextOverride obj)
   
9.           lsfactor (vla-get-LinearScaleFactor obj)
   
10.         )
    
11.         (if (or (not (or (equal textstr "") (wcmatch textstr "*<>*"))) (/= lsfactor 1.0))
    
12.           (progn
    
13.             (vla-put-TextColor obj 1)
    
14.             (setq n (1+ n))
    
15.           )
    
16.         )
    
17.       )
    
18.       (princ (strcat "\n找到" (itoa n) "个假尺寸并显示红色。"))
    
19.     )
    
20.   )
    
21.   (prin1)
    
22. )

(defun c:jcc(/ ent i lsfactor n obj oldss textstr)<br />   (if (setq oldss (ssget '((0 . "DIMENSION"))))<br />     (progn<br />       (setq n 0 i -1)<br />       (while (setq ent (ssname oldss (setq i (1+ i))))<br />         (setq<br />           obj (vlax-ename->vla-object ent)<br />           textstr (vla-get-TextOverride obj)<br />           lsfactor (vla-get-LinearScaleFactor obj)<br />         )<br />         (if (or (not (or (equal textstr "") (wcmatch textstr "*<>*"))) (/= lsfactor 1.0))<br />           (progn<br />             (vla-put-TextColor obj 1)<br />             (setq n (1+ n))<br />           )<br />         )<br />       )<br />       (princ (strcat "\n找到" (itoa n) "个假尺寸并显示红色。"))<br />     )<br />   )<br />   (prin1)<br /> )

edata

vitalgg 发表于 2025-5-27 16:18
dxf42是实际测量结果， 1是用户修改的显示值。

1 由用户明确输入的标注文字。可选；默认值为测量结果。 ...

dxf 42也不一定准确,如果遇到dimflac不为1,就gg了,