Vla-put-freeze

提供: GizmoLabs - だいたい CAD LISP なサイト
移動先: 案内検索
構文
(Vla-put-freeze vla-object bool)


機能
画層のフリーズ状態を設定する。


引数
  • vla-object … VLAオブジェクト
  • bool … ブール
  •  :vlax-true : 画層をフリーズに設定
  •  :vlax-false : 画層をアンフリーズに設定
戻り値
nil


サンプル
(setq LayerTable (vla-get-Layers (vla-get-ActiveDocument (vlax-get-acad-object))))
(setq lay (vla-add LayerTable "NewLayer"))

; 表示
(vla-put-layeron lay :vlax-true)
(vla-put-layeron lay :vlax-false)

; フリーズ
(vla-put-freeze lay :vlax-true)
(vla-put-freeze lay :vlax-false)

; ロック
(vla-put-lock lay :vlax-true)
(vla-put-lock lay :vlax-false)

; 印刷
(vla-put-plottable lay :vlax-true)
(vla-put-plottable lay :vlax-false)

; 線の太さ
(vla-put-lineweight lay 18) ; 0.18mm
(vla-put-lineweight lay -3) ; 規定値

; 色
(vla-put-color lay 128)


関連事項