liaobadadi 发表于 2009-7-26 21:34:00

大侠请看，此块的属性怎么读取？

<p>块为914外面的圈，里面的属性值如图，他的我用LISP 程序读取块的联合属性列表，后 ，也找不到块的属性值， 请问怎么读取&nbsp;比如&nbsp; &nbsp;0.08485&lt;45&nbsp;&nbsp; 这个值啊？谢谢了</p>

liaobadadi 发表于 2009-7-26 21:35:00

liaobadadi 发表于 2009-7-26 21:39:00

为了让 大侠们看的清，再发一张！

ljttjl 发表于 2009-7-27 21:29:00

<p>思路：将得到块图元名，转换成vla对象，然后使用其vla-GetAttributes方法，得到此块包含所有属性的vla对象，然后用vla-get-textstring属性得到需要的属性值。</p>

liaobadadi 发表于 2009-7-31 21:37:00

大侠请问，此块的读写 分别如何操作， 写 两句 关键语句，不胜感激~~~~~~~~~~~

ZZXXQQ 发表于 2009-8-1 09:56:00


;在命令行显示图块属性 明经 ZZXXQQ 2007.10.29
(DEFUN C:PRTATTRIB ()
(SETVAR "CMDECHO" 1)
(IF (AND (PRINC "\nSelect Block with attribute 选择带属性图块 :")
          (SETQ SS (SSGET '((0 . "INSERT") (66 . 1))))) (PROGN
(SETQ I -1)
(REPEAT (SSLENGTH SS)
   (SETQ ENT (ENTGET (SSNAME SS (SETQ I (1+ I))))
         ENT1 ENT)
   (WHILE (= (CDR (ASSOC 0 (SETQ ENT1 (ENTGET (ENTNEXT (CDR (ASSOC -1 ENT1))))))) "ATTRIB")
    (PRINC ENT1)
    (WRITE-LINE (CDR (ASSOC 1 ENT1)))
   )
   (PRINC "\n")
)
))
(SETVAR "CMDECHO" 1)
(PRINC)
)

liaobadadi 发表于 2009-8-1 21:20:00

<p>自己顶一下</p><p></p>

liaobadadi 发表于 2009-8-1 21:26:00

<p>万分感谢啊 ，我找了好久好久， 十分感谢， 上帝保佑你，给你烧高香啊 ~~~~&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </p><p>&nbsp;</p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 总之太感谢了~~

liaobadadi 发表于 2009-8-1 21:27:00

<p>万分感谢啊 ，我找了好久好久， 十分感谢， 上帝保佑你，给你烧高香啊 ~~~~&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </p><p>&nbsp;</p><p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 总之太感谢了~~&nbsp; </p><p></p><p>不是想灌水，也不想获得什么积分之类，感谢版主</p>

喜羊羊 发表于 2009-8-1 22:23:00

<p>初来咋到,学学经验</p>
页: [1] 2
查看完整版本: 大侠请看，此块的属性怎么读取？