Vla-put-helpfilepath

提供:GizmoLabs - だいたい CAD LISP なサイト
2015年1月12日 (月) 11:41時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (vla-put-helpfilepath ''vla-object'' ''path'') ; 機能 : CAD のヘルプ ファイルの位置を指定する。 ; 引数 :* vla-object … ...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vla-put-helpfilepath vla-object path)


機能
CAD のヘルプ ファイルの位置を指定する。


引数
  • vla-object … PreferencesFilesのVLAオブジェクト
  • path … ヘルプファイルのパス


戻り値
nil
  • MEMO: このプロパティは CAD ヘルプ ファイルのドライブ、パス、およびファイル名を指定する。


サンプル
(vl-load-com)
(defun c:Example_HelpFilePath()
    ;; ヘルプファイルパスを取得・変更するサンプル
    (setq acadObj (vlax-get-acad-object))
    (setq preferences (vla-get-Preferences acadObj))
    
    ;; 現在のパス
    (setq currHelpFilePath (vla-get-HelpFilePath (vla-get-Files preferences)))
    (alert (strcat "現在の HelpFilePath は " currHelpFilePath))
    
    ;; Change the value for HelpFilePath
    (setq newHelpFilePath "C:/CAD/Help")
    (vla-put-HelpFilePath (vla-get-Files preferences) newHelpFilePath)
    (alert (strcat "新しい HelpFilePath は " newHelpFilePath))
    
    ;; Reset HelpFilePath to its original value
    (vla-put-HelpFilePath (vla-get-Files preferences) currHelpFilePath)
    (alert (strcat "HelpFilePath を元に戻す " currHelpFilePath))
)

関連事項