Tin:istinsurface

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


機能
tinEname エンティティが有効な TinSurfaceエンティティであるかどうかを返す。


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


戻り値
有効な TinSurface エンティティなら T そうでなければ nil



サンプル
(vl-load-tin)
(setq tin (tin:createTin '(0 0 0) '(100 100 100) 1000))
(tin:istinsurface tin)
T ; 点が割り当てられてないけどエンティティ目は有効なので T が返る
(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:istinsurface tin) ; Tが返る

; Tin サーフェスを削除してから
(tin:istinsurface tin) 
nil ; エンティティがなくなったので nil が返る

関連事項