Tin:setminorcontourscolor

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


機能
tinEname TinSurface エンティティの小輪郭線のカラーインデックスを返す。


引数
  • tinEname : 問い合わせる TinSurface エンティティの ename または vla-object
  • index : 0 から 225 のカラーインデックスの整数


戻り値
(0...255) 小輪郭線の色インデックス.



サンプル
(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:setminorcontourscolor tin)
7
(tin:getminorcontourscolortin 120)
T
(tin:setminorcontourscolor tin)
120

関連事項