yang77 发表于 2008-1-21 18:00:00

怎样把自动获取的尺寸批量改为人为修改的状态？

<p>怎样把自动获取的尺寸批量改为人为修改的状态？？</p><p>图形是按1：1画出，标注出的尺寸能不能转为人为修改状态？原来是"&lt;&gt;"就是自动获取的尺寸，现在想一次把多个尺寸改为经过人为修改的状态，以防放大后数值会发生变化，一个一个地改太费时间。因为很多东西直接画在模型空间里，用图形空间不方便，所以想寻找这么一个方法，请教大家了，谢谢</p>

dunkel 发表于 2008-1-21 18:47:00

所要求的这个功能, 需要代码可以实现吧. 不过, 如果只是应对缩放造成的数值变换, 可以在缩放之后, 根据缩放比例设置尺寸标注样式里长度标注因子来进行调整的. 比如, 如果图形放大到 2 倍, 还要求原来 100 的尺寸标注仍然为 100, 那可以将 DimLFac 置为 0.5

ZZXXQQ 发表于 2008-1-21 19:54:00


;明经 ZZXXQQ 尺寸替代 2007.10.2
(DEFUN C:TT ()
(PRINC "\nSelect a Dimtion 选择尺寸:")
(IF (SETQ SS (SSGET '((0 . "DIMENSION")))) (PROGN
   (SETQ I -1)
   (REPEAT (SSLENGTH SS)
    (SETQ ENT (ENTGET (SSNAME SS (SETQ I (1+ I))))
          TP (CDR (ASSOC 100 (REVERSE ENT))))
    (IF (OR (= TP "AcDbRotatedDimension") (= TP "AcDbAlignedDimension"))
(SETQ L (RTOS (CDR (ASSOC 42 ENT)) 2 3))
)
    (IF (OR (= (SETQ TMPTX (CDR (ASSOC 1 ENT))) "<>") (= TMPTX "")) (PROGN
   (SETQ ENT (SUBST (CONS 1 L) (ASSOC 1 ENT) ENT))
   (ENTMOD ENT)
    ))
   )
))
(PRINC)
)

yang77 发表于 2008-1-22 18:22:00

<p>十分感谢两位的帮忙,我在这里也找到了答案,对比一下看看:</p><p><a href="http://bbs.mjtd.com/forum.php?mod=viewthread&tid=17707">http://bbs.mjtd.com/forum.php?mod=viewthread&tid=17707</a></p>
页: [1]
查看完整版本: 怎样把自动获取的尺寸批量改为人为修改的状态？