Vla-put-printspoolexecutable

提供:GizmoLabs - だいたい CAD LISP なサイト
2016年1月5日 (火) 22:57時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (vla-put-printspoolexecutable ''vla-object'' ''name'') ; 機能 : 印刷スプールに使用するアプリケーションを指定する。...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vla-put-printspoolexecutable vla-object name)


機能
印刷スプールに使用するアプリケーションを指定する。


引数
  • vla-object … PreferencesFiles の VLAオブジェクト
  • name … 印刷スプールに使うアプリケーション名の文字列。


戻り値
nil


  • 注意 : このプロパティは、AutoSpool と一緒に使用する印刷スプール実行可能ファイルの、ドライブ、パス、およびアプリケーション名を含む。


サンプル
(vl-load-com)
(defun c:Example_PrintSpoolExecutable()
    ;; PrintSpoolExecutable の設定を読み込み変更するサンプル
    ;; 値は最後に元に戻す
    (setq acadObj (vlax-get-acad-object))
    (setq preferences (vla-get-Preferences acadObj))
    
    ;; 現在の設定を表示
    (setq currPrintSpoolExecutable (vla-get-PrintSpoolExecutable (vla-get-Files preferences)))
    (alert (strcat "現在の PrintSpoolExecutable 値は " currPrintSpoolExecutable))
    
    ;; PrintSpoolExecutable の値を変更
    (setq newPrintSpoolExecutable "TestPrintSpoolExecutable")
    (vla-put-PrintSpoolExecutable (vla-get-Files preferences) newPrintSpoolExecutable)
    (alert (strcat "新しい PrintSpoolExecutable 値は " newPrintSpoolExecutable))
    
    ;; 元に戻す
    (vla-put-PrintSpoolExecutable (vla-get-Files preferences) currPrintSpoolExecutable)
    (alert (strcat "PrintSpoolExecutable の値を元に戻します " currPrintSpoolExecutable))
)

関連事項