「Vla-getcanonicalmedianames」の版間の差分
(ページの作成:「{{AutoLISP}} ; 構文 : (vla-put-getcanonicalmedianames ''vla-object'' ''papers'') ; 機能 : ; 引数 :* vla-object … VLAオブジェクト(Layout、PlotConfigura...」) |
細編集の要約なし |
||
1行目: | 1行目: | ||
{{AutoLISP}} | {{AutoLISP}} | ||
; 構文 | ; 構文 | ||
: (vla | : (vla-getcanonicalmedianames ''vla-object'' ''papers'') | ||
71行目: | 71行目: | ||
* [[vlax-get-acad-object]] | * [[vlax-get-acad-object]] | ||
* [[vla-get-activedocument]] | * [[vla-get-activedocument]] | ||
* [[vla | * [[vla-getcanonicalmedianames]] | ||
* [[vla- | * [[vla-getlocalmedianame]] | ||
* [[vla-getplotstyletablenames]] | |||
* [[vla-getplotdevicenames ]] | |||
[[Category:AutoLISP]] | [[Category:AutoLISP]] |
2016年1月22日 (金) 08:39時点における版
- 構文
- (vla-getcanonicalmedianames vla-object papers)
- 機能
- 引数
-
- vla-object … VLAオブジェクト(Layout、PlotConfiguration)
- papers … 指定された印刷デバイスで使用可能な用紙名の配列
- 戻り値
- nil
- MEMO : 最初にこのメソッドを使用する前に RefreshPlotDeviceInfo を呼び出す必要がある。一度 RefreshPlotDeviceInfo を呼び出しておけば、そのセッションの間に印刷デバイスの情報に変更がない限り RefreshPlotDeviceInfo を再び呼び出す必要はない。
- サンプル
(vl-load-com) (defun c:Example_GetCanonicalMediaNames() ;; 現在のプロットデバイス情報を取得し、プロットデバイス名、 ;; メディア名、ローカライズされたメディア名、および ;; 印刷スタイルテーブルエントリのリストを表示するサンプル (setq acadObj (vlax-get-acad-object)) (setq doc (vla-get-ActiveDocument acadObj)) (setq Layout (vla-get-Layout (vla-get-ModelSpace doc))) ;; このセッションの Plot information を取得 (vla-RefreshPlotDeviceInfo Layout) ;; システムのすべての印刷デバイス名、ローカライズされたバージョンをリスト (setq plotDevices (vlax-variant-value (vla-GetPlotDeviceNames Layout))) (setq x 0) (while (>= (vlax-safearray-get-u-bound plotDevices 1) x) (alert (vlax-safearray-get-element plotDevices x)) (setq x (1+ x)) ) ;; メディア名をリスト (setq mediaNames (vlax-variant-value (vla-GetCanonicalMediaNames Layout))) (setq x 0) (while (>= (vlax-safearray-get-u-bound mediaNames 1) x) (alert (vlax-safearray-get-element mediaNames x)) (alert (vla-GetLocaleMediaName Layout (vlax-safearray-get-element mediaNames x))) (setq x (1+ x)) ) ;; 印刷スタイル名をリスト (setq styleNames (vlax-variant-value (vla-GetPlotStyleTableNames Layout))) (setq x 0) (while (>= (vlax-safearray-get-u-bound styleNames 1) x) (alert (vlax-safearray-get-element styleNames x)) (setq x (1+ x)) ) )
関連事項