Tin:getborders

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(tin:getborders tinEname )


機能
この関数は、tinEname TinSurface エンティティの '境界線ポリゴン' のリスト (3D ポイントリストのリスト) を返す。


引数
  • tinEname : (ename または vla-object) 問い合わせる TinSurface エンティティ


戻り値
TinSurface エンティティの境界ポリゴンの 3D点リストのリスト、 または NIL


  • メモ
TinSurface のポリゴンは1つだけでなく、複数存在する可能性がある。
つまりポリゴンリストごとのリストになる。
((ポリゴン1点リスト) (ポリゴン2点リスト)...)
サンプル

(vl-load-tin)
(setq tin (tin:createTin '(0 0 0) '(100 100 100) 1000))
<Entity name: 4fca4360>

(tin:getArea3d tin T) ;; 作成されたTinSurface に、点が追加されてないので nil。
nil

(tin:addpoints tin '((10 80 5) (50 50 10) (10 10 2) (80 20 7) (70 60 3) (40 70 10) (25 25 6) (55 55 2) (75 45 5) ))

(tin:getborders  tin )
(((40.0 70.0 10.0) (70.0 60.0 3.0) (75.0 45.0 5.0) (80.0 20.0 7.0) (10.0 10.0 2.0) (10.0 80.0 5.0) (40.0 70.0 10.0))) ; このリストには1つのボーダーポリゴンが含まれている。


関連事項