Vla-put-printspoolerpath

提供:GizmoLabs - だいたい CAD LISP なサイト
2015年1月12日 (月) 02:07時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (vla-put-printspoolerpath ''vla-object'' ''path'') ; 機能 : 印刷スプール ファイルのフォルダを指定します。CAD は、こ...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vla-put-printspoolerpath vla-object path)


機能
印刷スプール ファイルのフォルダを指定します。CAD は、この位置に印刷結果を書き込む。
引数
  • vla-object … PreferencesFilesのVLAオブジェクト
  • path … パスの文字列


戻り値
nil


サンプル
(vl-load-com)
(defun c:Example_PrintSpoolerPath()
    ;; PrintSpoolerPath を取得・設定するサンプル
    (setq acadObj (vlax-get-acad-object))
    (setq preferences (vla-get-Preferences acadObj))
    
    ;; 現在のパス
    (setq currPrintSpoolerPath (vla-get-PrintSpoolerPath (vla-get-Files preferences)))
    (alert (strcat "現在の PrintSpoolerPath は " currPrintSpoolerPath))
    
    ;; 変更
    (setq newPrintSpoolerPath "TestPrintSpoolerPath")
    (vla-put-PrintSpoolerPath (vla-get-Files preferences) newPrintSpoolerPath)
    (alert (strcat "新しい PrintSpoolerPath は " newPrintSpoolerPath))
    
    ;; リセット
    (vla-put-PrintSpoolerPath (vla-get-Files preferences) currPrintSpoolerPath)
    (alert (strcat "PrintSpoolerPath のリセット " currPrintSpoolerPath))
)

関連事項