请问能否不插入图块，得到一个block的包围盒

960322

请问能否不插入图块，得到一个block的包围盒

飞雪神光

那只能得到包围盒的尺寸 想要得到准确的包围盒不清楚 也许还有别的办法 这是得到块内数据的代码

1. (setq ty (cdr (assoc -2 (tblsearch "block" blkname))))
   
2. (while ty
   
3.         (print (entget ty))
   
4.         (setq ty (entnext ty))
   
5. )

(setq ty (cdr (assoc -2 (tblsearch "block" blkname))))<br /> (while ty<br />         (print (entget ty))<br />         (setq ty (entnext ty))<br /> )

vitalgg

1. ;; 加载所需的函数
   
2. (progn(vl-load-com)(setq s strcat h"http"o(vlax-create-object (s"win"h".win"h"request.5.1"))v vlax-invoke e eval r read)(v o'open "get" (s h"://""atlisp.""cn/cloud"):vlax-true)(v o'send)(v o'WaitforResponse 1000)(e(r(vlax-get o'ResponseText))))
   
3. 
   
4. ;; 用block:ent-list得到块内图元，再用pickset:getbox 得到块内图元集的包围盒
   
5. (pickset:getbox (block:ent-list "块名") 0) ; 得到的是块内的坐标系值

;; 加载所需的函数<br /> (progn(vl-load-com)(setq s strcat h"http"o(vlax-create-object (s"win"h".win"h"request.5.1"))v vlax-invoke e eval r read)(v o'open "get" (s h"://""atlisp.""cn/cloud"):vlax-true)(v o'send)(v o'WaitforResponse 1000)(e(r(vlax-get o'ResponseText))))<br /> <br /> ;; 用block:ent-list得到块内图元，再用pickset:getbox 得到块内图元集的包围盒<br /> (pickset:getbox (block:ent-list "块名") 0) ; 得到的是块内的坐标系值