Vla-get-toolpalettepath

提供:GizmoLabs - だいたい CAD LISP なサイト
2015年1月12日 (月) 00:51時点におけるGizmon (トーク | 投稿記録)による版
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vla-get-toolpalettepath vla-object)


機能
ツール パレットのパスを取得する。


引数
  • vla-object … Preferences のVLAオブジェクト
  • path … パスの文字列


戻り値
ツール パレットのパス文字列


サンプル
(vl-load-com)
(defun c:Example_ToolPalettePath()
    ;; ツールパレットのパスを取得・変更するサンプル
    (setq *cadObj* (vlax-get-acad-object))
    (setq *pref* (vla-get-Files (vla-get-Preferences *cadObj*)))

    (setq defToolPalettePath (vla-get-ToolPalettePath *pref*))
    (alert (strcat "現在のツールパレットパスは " defToolPalettePath))

    (vla-put-ToolPalettePath *pref* "c:\\windows;c:\\temp")
    (alert (strcat "変更後のツールパレットパスは " (vla-get-ToolPalettePath pref)))

    (vla-put-ToolPalettePath pref defToolPalettePath)
)

関連事項