Vla-get-readonly

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(vla-get-readonly vla-object)


機能
ドキュメント又はプロパティが読み込み専用か、読み書き可能かを取得する。


引数
  • vla-object … VLAオブジェクト(Document、DynamicBlockReferenceProperty)


戻り値
ブール型(:VLAX-TRUE… 読み込み専用、:VLAX-FALSE: 読み書き可能。)


サンプル
(vl-load-com)
(defun c:Example_ReadOnly()
    ;; カレント図面が読み込み専用か表示する
    (setq doc (vla-get-ActiveDocument (vlax-get-acad-object)))
    (if (= (vla-get-ReadOnly doc) :vlax-true)
        (alert "この図面は読み込み専用です。")
        (alert "この図面は読み書き可能です。")
    ))

関連事項