[求助]：请教一下，这个能不能改？

有点小烦

领导说这个尺寸界线有点细，我想知道怎么样能在CAD的系统里找到在和个，把它稍微调粗一点，我想的话，CAD的标注程序里应该是引用了这个块的吧？“ARCHTICK”？

Free-Lancer

1 Insert _ArchTick -〉Refedit

2

2. 
   
3. (defun c:tt (/ scl blkdef pl pw ss ssl i)
   
4.   (if (setq scl (getdist "\n输入缩放倍数: "))
   
5.     (progn
   
6.       (setq blkdef (vla-item
   
7.                      (vla-get-blocks
   
8.                        (vla-get-activedocument (vlax-get-acad-object))
   
9.                      )
   
10.                      "_ArchTick"
    
11.                    )
    
12.             pl           (vla-item blkdef 0)
    
13.             pw           (vla-get-constantwidth pl)
    
14.       )
    
15.       (vla-put-constantwidth pl (* pw scl))
    
16.       (if (setq ss (ssget "X" '((0 . "dimension"))))
    
17.         (progn
    
18.           (setq        ssl (sslength ss)
    
19.                 i   -1
    
20.           )
    
21.           (repeat ssl
    
22.             (entupd (ssname ss (setq i (1+ i))))
    
23.           )
    
24.         )
    
25.       )
    
26. 
    
27.     )
    
28.   )
    
29.   (princ)
    
30. )
    

<br /> (defun c:tt (/ scl blkdef pl pw ss ssl i)<br />   (if (setq scl (getdist "\n输入缩放倍数: "))<br />     (progn<br />       (setq blkdef (vla-item<br />                      (vla-get-blocks<br />                        (vla-get-activedocument (vlax-get-acad-object))<br />                      )<br />                      "_ArchTick"<br />                    )<br />             pl           (vla-item blkdef 0)<br />             pw           (vla-get-constantwidth pl)<br />       )<br />       (vla-put-constantwidth pl (* pw scl))<br />       (if (setq ss (ssget "X" '((0 . "dimension"))))<br />         (progn<br />           (setq        ssl (sslength ss)<br />                 i   -1<br />           )<br />           (repeat ssl<br />             (entupd (ssname ss (setq i (1+ i))))<br />           )<br />         )<br />       )<br /> <br />     )<br />   )<br />   (princ)<br /> )<br />

有点小烦

请问这个是改变当前文件的还是改变整个CAD系统的？

eachy

_ArchTick 这个块应该是 ACAD 命令在当前文档中生成的，所以修改也是针对当前文档，不会是整个系统

有点小烦

有没有办法修改整个系统的捏？？？

eachy

修改 ACADISO.DWT 文件，使其中含有修改的 _ArchTick 图块

有点小烦

那要最开始就用这个模版了。做其他的也要把内容拷贝到一个这样的模版里才行咯？我只是看了天正的比较粗，不知道他们是怎么设置的。