恶心的“空隙”，如何消除？

尘缘一生

尺寸标准，总有个”空隙”存在，如何消除？是哪个变量控制的呢？

xinxirong

发图上来，。。。

鹏程

(setvar "dimexo" 0)

尘缘一生

鹏程 发表于 2017-8-24 12:04
(setvar "dimexo" 0)

这个问题，可以采用重新定义 "_archtick" 解决，我弄好了。

尘缘一生

重定义，建筑标记，使之变得粗壮些。当然，标注 style  需要你照常选择为："_archtick"

1. (if (null (tblobjname "block" "_archtick"))   
   
2.     (progn   
   
3.       (setq p1 '(0 0)
   
4.       p2 (polar p1 (* pi 0.25) 0.71)
   
5.       p3 (polar p1 (* pi 1.25) 0.71)
   
6.       )
   
7.       (command "pline" "non" p2 "w" 0.45 "" "non" p3 "")
   
8.       (command "block" "_archtick" "non" p1 (entlast) "")     
   
9.     )
   
10.   )
    
11. (if (tblobjname "block" "_archtick")  
    
12.     (progn   
    
13.       (setq p1 '(0 0)
    
14.       p2 (polar p1 (* pi 0.25) 0.71)
    
15.       p3 (polar p1 (* pi 1.25) 0.71)
    
16.       )
    
17.       (command "pline" "non" p2 "w" 0.45 "" "non" p3 "")
    
18.       (command "block" "_archtick" "Y" "non" p1 (entlast) "")     
    
19.     )
    
20.   )

(if (null (tblobjname "block" "_archtick"))   <br />     (progn    <br />       (setq p1 '(0 0)<br />       p2 (polar p1 (* pi 0.25) 0.71)<br />       p3 (polar p1 (* pi 1.25) 0.71)<br />       )<br />       (command "pline" "non" p2 "w" 0.45 "" "non" p3 "")<br />       (command "block" "_archtick" "non" p1 (entlast) "")     <br />     )<br />   )<br /> (if (tblobjname "block" "_archtick")  <br />     (progn    <br />       (setq p1 '(0 0)<br />       p2 (polar p1 (* pi 0.25) 0.71)<br />       p3 (polar p1 (* pi 1.25) 0.71)<br />       )<br />       (command "pline" "non" p2 "w" 0.45 "" "non" p3 "")<br />       (command "block" "_archtick" "Y" "non" p1 (entlast) "")     <br />     )<br />   )

llsheng_73

尘缘一生 发表于 2017-8-24 21:15
重定义，建筑标记，使之变得粗壮些。当然，标注 style  需要你照常选择为："_archtick"

2. (setq p1 '(0 0)
   
3.       p2 (polar p1 (* pi 0.25) 0.71)
   
4.       p3 (polar p1 (* pi 1.25) 0.71)
   
5.       )
   
6. (command "pline" "non" p2 "w" 0.45 "" "non" p3 "")
   
7. (command "block" "_archtick" "Y" "non" p1 (entlast) "")
   

(setq p1 '(0 0)<br />       p2 (polar p1 (* pi 0.25) 0.71)<br />       p3 (polar p1 (* pi 1.25) 0.71)<br />       )<br /> (command "pline" "non" p2 "w" 0.45 "" "non" p3 "")<br /> (command "block" "_archtick" "Y" "non" p1 (entlast) "")<br />

条件真和假都是运行的这一部分，那么，判断有必要么？

llsheng_73

尘缘一生 发表于 2017-8-24 21:15
重定义，建筑标记，使之变得粗壮些。当然，标注 style  需要你照常选择为："_archtick"

(setq p1 '(0 0)
      p2 (polar p1 (* pi 0.25) 0.71)
      p3 (polar p1 (* pi 1.25) 0.71)
      )
(apply'command(vl-remove'nil(list"pline" "non" p2 "w" 0.45 "" "non" p3 ""
                                 "block" "_archtick"(if(tblobjname "block" "_archtick") "Y")"non" p1 (entlast) "")))

sroo

支持较真，支持严谨