「Vla-get-texturemappath」の版間の差分
(ページの作成:「{{AutoLISP}} ; 構文 : (vla-get-texturemappath ''vla-object'') ; 機能 : CAD がレンダリング テクスチャ マップを検索するフォルダを取得す...」) |
細編集の要約なし |
||
| 16行目: | 16行目: | ||
* 注意: パスにセミコロン(;)を使用して複数のパスを入力できる。 | * 注意: パスにセミコロン(;)を使用して複数のパスを入力できる。 | ||
; サンプル | ; サンプル | ||
2015年1月12日 (月) 01:08時点における最新版
- 構文
- (vla-get-texturemappath vla-object)
- 機能
- CAD がレンダリング テクスチャ マップを検索するフォルダを取得する。
- 引数
-
- vla-object … PreferencesFilesのVLAオブジェクト
- 戻り値
- パスの文字列
- 注意: パスにセミコロン(;)を使用して複数のパスを入力できる。
- サンプル
(vl-load-com)
(defun c:Example_TextureMapPath()
;; テクスチャマップのパスを取得・変更するサンプル
(setq acadObj (vlax-get-acad-object))
(setq preferences (vla-get-Preferences acadObj))
;; 現在のパス
(setq currTextureMapPath (vla-get-TextureMapPath (vla-get-Files preferences)))
(alert (strcat "現在の TextureMapPath は " currTextureMapPath))
;; パス変更
(setq newTextureMapPath "TestTextureMapPath")
(vla-put-TextureMapPath (vla-get-Files preferences) newTextureMapPath)
(alert (strcat "新しい TextureMapPath は " newTextureMapPath))
;; パスを元に戻す
(vla-put-TextureMapPath (vla-get-Files preferences) currTextureMapPath)
(alert (strcat "TextureMapPath の値をリセット " currTextureMapPath))
)
関連事項