「Vla-get-printfile」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{AutoLISP}} ; 構文 : (vla-get-printfile ''vla-object'') ; 機能 : 一時印刷ファイル名に使用する代替名を取得する。 ; 引数 :* vla-object...」)
 
編集の要約なし
 
47行目: 47行目:
関連事項
関連事項
* [[vlax-get-acad-object]]
* [[vlax-get-acad-object]]
* [[vla-get-Preferences]]
* [[vla-get-preferences]]
* [[vla-get-printfile]]
* [[vla-get-printfile]]
* [[vla-put-printfile]]
* [[vla-put-printfile]]


[[Category:AutoLISP]]
[[Category:AutoLISP]]

2015年7月11日 (土) 14:44時点における最新版

構文
(vla-get-printfile vla-object)


機能
一時印刷ファイル名に使用する代替名を取得する。


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


戻り値
一時印刷ファイル名の文字列


  • MEMO :

印刷ファイルの代替名。"." と入力すると、既定値(現在の図面名)が使用される。代替印刷ファイルのドライブ、パス、およびファイル名を入力する。 既定の名前は、図面名に拡張子 .plt を付けたもの。


サンプル
(vl-load-com)
(defun c:Example_PrintFile()
    ;; 現在の PrintFile を取得・変更してからもとに戻すサンプル
    (setq acadObj (vlax-get-acad-object))
    (setq preferences (vla-get-Preferences acadObj))
    
    ;; 現在の PrintFile 値を返す
    (setq currPrintFile (vla-get-PrintFile (vla-get-Files preferences)))
    (alert (strcat "現在の PrintFile 値は " currPrintFile))
    
    ;; PrintFile を変更
    (setq newValue "TestPrintFile.plt")
    (vla-put-PrintFile (vla-get-Files preferences) newValue)
    (alert (strcat "新しい PrintFile 値は " newValue))
    
    ;; PrintFile を元に戻す
    (vla-put-PrintFile (vla-get-Files preferences) currPrintFile)
    (alert (strcat "PrintFile 値を元に戻しました " currPrintFile))
)

関連事項