Vla-get-driverspath

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

構文: (vla-get-driverspath vla-object)

機能: CAD がビデオディスプレイ、ポインティングデバイス、プリンタ、プロッタの ADI デバイスドライバを検索するフォルダを取得する。

引数

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

戻り値: パスの文字列

MEMO：デバイスドライバがあるフォルダそれぞれのパスのドライブ文字とパスを指定する。複数のフォルダのリストはセミコロン(;)で区切る。

サンプル

(vl-load-com)
(defun c:Example_DriversPath()
    ;; ドライバーズパスを取得・変更するサンプル
    (setq acadObj (vlax-get-acad-object))
    (setq preferences (vla-get-Preferences acadObj))
  
    ;; 取得
    (setq currDriversPath (vla-get-DriversPath (vla-get-Files preferences)))
    (alert (strcat "現在の DriversPath は " currDriversPath))
    
    ;; 更新
    (setq newDriversPath "TestDriversPath")
    (vla-put-DriversPath (vla-get-Files preferences) newDriversPath)
    (alert (strcat "新しい DriversPath は " newDriversPath))
    
    ;; リセット
    (vla-put-DriversPath (vla-get-Files preferences) currDriversPath)
    (alert (strcat "DriversPath を元に戻す " currDriversPath))
)