Vla-get-colorbookpath

AutoLISP Home - AutoLISP 目次 - DCL - AutoLisp関数互換表 - CAD&CGブログ - オンラインショップ- GizmoTools ヘルプセンター

構文: (vla-put-colorbookpath vla-object)

機能: カラーブックのパスを取得する。

引数

vla-object … PreferencesFilesのVLAオブジェクト

戻り値: カラーブックファイルのパス

サンプル

(vl-load-com)
(defun c:Example_ColorBookPath()
    ;; カラーブックパスの取得・変更サンプル
    (setq acadObj (vlax-get-acad-object))
    (setq pref (vla-get-Files (vla-get-Preferences acadObj)))

    (setq defCBPath (vla-get-ColorBookPath pref))
    (alert (strcat "現在の color book path は " defCBPath))

    (vla-put-ColorBookPath pref "c:\\winnt;c:\\temp")
    (setq changedCBPath (vla-get-ColorBookPath pref))
    (alert (strcat "新しい color book path は " changedCBPath))

    (vla-put-ColorBookPath pref defCBPath)
)