Tin:setstyle

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(Tin:setstyle tinEname style)


機能
この関数は、tinEname TinSurfaceエンティティの実際の可視化スタイル(三角形、輪郭線、境界線...など)を返す。


引数
  • tinEname : TinSurface エンティティの ename または vla-object
  • style : スタイルのビットフラグ整数。フラグの組み合わせ、"型定数" 参照
戻り値
セットできたら T 出来なかったら nil


  • メモ :

すべてのスタイルフラグに対応するシンボル定数がある。

    • bcTinStyleNone 0
    • bcTinStyleBoundary 1
    • bcTinStylePoints 2
    • bcTinStyleTriangles 4
    • bcTinStyleContours 8
    • bcTinStyleElevationTooltip 16

tin:getstyle 関数も参照。


サンプル
(vl-load-tin)
(setq tin (tin:createTin '(0 0 0) '(100 100 100) 1000))
(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:setStyle tin (+ 4  8))
(tin:getStyle tin)
12 ; bcTinStyleTriangles + bcTinStyleContours

関連事項