「Tinvs:isvolumesurface」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{BCAD_LISP_CIVIL}} ; 構文 : (tinvs:isvolumesurface''tinEname'') ; 機能 : tinEnameエンティティが有効な TinVolumeSurface エンティティであるかど…」)
 
編集の要約なし
2行目: 2行目:


; 構文
; 構文
: (tinvs:isvolumesurface''tinEname'')
: (tinvs:isvolumesurface ''tinEname'')





2022年10月3日 (月) 09:10時点における版

構文
(tinvs:isvolumesurface tinEname)


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


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


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



サンプル
(vl-load-tin)
(setq tin (tin:createTin '(0 0 0) '(100 100 100) 1000))
(tinvs:isvolumesurface tin)
nil ; 有効なTinVolumeSurface  ではないので 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) ))
(tinvs:isvolumesurface tin) 
nil ; 有効なTinVolumeSurface  ではないので nil が返る

(tinvs:createBySurfaceAndEntity  tin  bcTinVolumeToDepth  -5  (entlast)  0.2)
(tinvs:isvolumesurface tin) 
T ; 有効な TinVolumeSurface が作成されたので T が返る

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

関連事項