Vla-put-imagefile

提供:GizmoLabs - だいたい CAD LISP なサイト
2015年10月13日 (火) 20:22時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (va-put-imagefile ''vla-object'' ''path'') ; 機能 : ラスター イメージ ファイルのフルパスとファイル名を指定する。...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(va-put-imagefile vla-object path)


機能
ラスター イメージ ファイルのフルパスとファイル名を指定する。


引数
  • vla-object … VLA オブジェクト(Raster、Wipeout)
  • path … パスの文字列


戻り値
nil
  • 注意 : このプロパティにはパス情報がありますが Name プロパティにはないという点を除き、このプロパティは Name プロパティと似ている。このプロパティを使用して、新しいラスター イメージを既存のラスター図形内にロードできまる。


サンプル
(vl-load-com)
(defun repath_images (/ ss i img iname)
; イメージのパスを消すサンプル  
  (setq ss (ssget "X" '((0 . "IMAGE"))))
  (setq i -1)
  (while (< (setq i (1+ i)) (sslength ss))
    (setq img (vlax-ename->vla-object (ssname ss i))
          Iname (vla-get-imagefile img))
    (while (vl-string-search "\\" Iname)
      (setq Iname (substr Iname 2))
    )
    (vla-put-imagefile img Iname)
  )
)

関連事項