Tingr:set-visualstyle

提供:GizmoLabs - だいたい CAD LISP なサイト
2023年7月22日 (土) 09:14時点におけるGizmon (トーク | 投稿記録)による版 (Gizmon (トーク) による版 11271 を取り消し)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(Tingr:set-visualstyle grading style )


機能
TinGrading エンティティが使用する視覚スタイルを割り当てる。


引数
  • grading : TinGrading のエンティティ名(ename または vla-object)。
  • style : 使用する視覚スタイルの整数 (bcTinGradingDrawNothing 0, bcTinGradingDrawSurface 1, bcTinGradingDrawRays 2, bcTinGradingDrawDaylight 4)


戻り値
設定成功なら T、そうでなければ nil


MEMO


サンプル
(vl-load-tin)
(setq gr (car (entsel)))
(tingr:get-visualstyle gr)
1
(tingr:set-visualstyle gr 4)
T
(tingr:get-visualstyle gr)
4

(tingr:set-visualstyle (car (entsel)) 0) ; グレーディングでない図形を選択した場合
nil



関連事項