[求助]請問如何用LISP取得面域的邊界座標點?

pizg

請問如何用LISP取得面域的邊界座標點?

ForYang

剑无锋 发表于 2012-7-28 16:38
在检测面域对象的时候，发现里面有GetBoundingBox (2),GetExtensionDictionary(),GetXData (3)三个属性的获 ...

GetBoundingBox好像不能获取有样条曲线绘制的图形边界，请问怎么解决

pizg

真的沒人會嗎?
頂一下, 不然快沉了

zark

(command "_.boundary" "A" "O" "P" "" pt "")

    (setq enlist (entget (entlast) '("*")))
  (foreach n enlist
    (if (= (car n) 10) (setq PT_LST (cons n pt_lst)))
  )

Andyhon

原pLine的资料
((0 . "LWPOLYLINE") (330 . <Entity name: 7ef8bcb8>) (5 . "157")
(100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbPolyline")
(90 . 4) (70 . 1) (43 . 0.0) (38 . 0.0) (39 . 0.0) (10 0.0 0.0) (40 . 0.0) (41
. 0.0) (42 . 0.0) (10 3.0 0.0) (40 . 0.0) (41 . 0.0) (42 . 0.0) (10 3.0 3.0)
(40 . 0.0) (41 . 0.0) (42 . 0.0) (10 0.0 3.0) (40 . 0.0) (41 . 0.0) (42 . 0.0)
(210 0.0 0.0 1.0))

转成REGION后的资料
((0 . "REGION") (330 . <Entity name: 7ef8bcb8>) (5 . "158") (100
. "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 .
"AcDbModelerGeometry") (70 . 1) (1 . "mogoo mh m o          ") (1 . "ni
^*+0;:,4 ^*+0\\^[ nh ^LR iqoqjqhook QK mk R01 R>& om nmeogeln monn ") (1 . "n
fqfffffffffffffffj:rooh n:rono ") (1 . ">,27:>;:- {rn rn _nm mogqoqjqhook |")
(1 . "=0;& {rn rn {rn {m {rn {rn |") (1 . "3*2/ {rn rn {rn {rn {l {n |") (1 .
",7:33 {rn rn {rn {rn {rn {k {rn {m |") (1 . "9><: {rn rn {rn {rn {j {l {rn {i
90-(>-; ;0*=3: 0*+ |") (1 . "300/ {rn rn {rn {rn {h {k |") (1 . "/3>1:r,*-9><:
{rn rn {rn nqj nqj o o o n n o o 90-(>-;@) V V V V |") (1 . "<0:;8: {rn rn {rn
{g {f {rn {no 90-(>-; {j {rn |") (1 . "<0:;8: {rn rn {rn {nn {h {rn {nm 90-(>-;
{j {rn |") (1 . "<0:;8: {rn rn {rn {h {nn {rn {nl 90-(>-; {j {rn |") (1 . ":;8:
{rn rn {rn {nk o {nj l {h {ni 90-(>-; _h *1410(1 |") (1 . "<0:;8: {rn rn {rn {f
{g {rn {nh 90-(>-; {j {rn |") (1 . ":;8: {rn rn {rn {nj o {ng l {g {nf 90-(>-;
_h *1410(1 |") (1 . ":;8: {rn rn {rn {mo o {nk l {f {mn 90-(>-; _h *1410(1 |")
(1 . "):-+:' {rn rn {rn {no {mm |") (1 . "):-+:' {rn rn {rn {no {ml |") (1 .
",+->687+r<*-): {rn rn {rn o o o n o o V V |") (1 . ":;8: {rn rn {rn {ng o {mo
l {nn {mk 90-(>-; _h *1410(1 |") (1 . "):-+:' {rn rn {rn {nm {mj |") (1 .
",+->687+r<*-): {rn rn {rn l o o o n o V V |") (1 . "):-+:' {rn rn {rn {nh {mi
|") (1 . ",+->687+r<*-): {rn rn {rn o l o o rn o V V |") (1 . "/061+ {rn rn {rn
o o o |") (1 . "/061+ {rn rn {rn l o o |") (1 . ",+->687+r<*-): {rn rn {rn l l
o rn o o V V |") (1 . "/061+ {rn rn {rn l l o |") (1 . "/061+ {rn rn {rn o l o
|"))

简方是还原成转化前的资料
若欲练功则可搜寻 ACIS 的相关资料

ZZXXQQ

炸开，读取坐标后再UNDO回去。

pizg

ZZXXQQ 发表于 2011-5-2 15:15
炸开，读取坐标后再UNDO回去。

呵~~您的方法也不錯!

zark

zark已经给出答案了，创建时不要创建面域嘛，可以直接创建PL线

pizg

zark 发表于 2011-5-2 21:00
zark已经给出答案了，创建时不要创建面域嘛，可以直接创建PL线

因為要做布林運算,
所以物件必須是面域.

zark

回复 pizg 的帖子

啊,脑子有点转不过弯来哦.
你不会先执行一次,让他生成PL线的,然后获取他的角点坐标.之后再把生成的这个用(entdel)删除,再生成一个面域的?

pizg

回复 zark 的帖子

呵~~~~~~瞭解了
感謝您唷