匿名块

freedom_ice

如下图，有一个带属性的命名块，双击或者用块编辑器的时候，可以看到块的名称；

但是用entget获取组码的时候，获取块名是带星号的匿名块，(2 . "*U175")
请教，为什么会这样。
(entget ( ssname (ssget) 0 ))

((-1 . <图元名: 7ffffb50e70>) (0 . "INSERT") (5 . "53157") (102 . "{ACAD_XDICTIONARY") (360 . <图元名: 7ffffb51590>) (102 . "}") (330 . <图元名: 7ffffb069f0>) (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "建材院图签") (100 . "AcDbBlockReference") (66 . 1) (2 . "*U175") (10 166174.0 -748632.0 0.0) (41 . 1.0) (42 . 1.0) (43 . 1.0) (50 . 0.0) (70 . 0) (71 . 0) (44 . 0.0) (45 . 0.0) (210 0.0 0.0 1.0))

liuhe

2. ;; Effective Block Name  -  Lee Mac
   
3. ;; obj - [vla] VLA Block Reference object
   
4. 
   
5. (defun LM:effectivename ( obj )
   
6.     (vlax-get-property obj
   
7.         (if (vlax-property-available-p obj 'effectivename)
   
8.             'effectivename
   
9.             'name
   
10.         )
    
11.     )
    
12. )

;; Effective Block Name  -  Lee Mac<br /> ;; obj - [vla] VLA Block Reference object<br /> <br /> (defun LM:effectivename ( obj )<br />     (vlax-get-property obj<br />         (if (vlax-property-available-p obj 'effectivename)<br />             'effectivename<br />             'name<br />         )<br />     )<br /> )

d1742647821

lisp区的来.net区发贴？？？？？