Vla-get-imagefile

提供: GizmoLabs - だいたい CAD LISP なサイト
移動先: 案内検索
構文
(va-get-imagefile vla-object)


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


引数
  • vla-object … VLA オブジェクト(Raster、Wipeout)


戻り値
パスの文字列


サンプル

(defun imgatlist ()
  ; アタッチされているイメージのパスを返す
  ((lambda (acDoc / ss images)
    (if (setq ss (ssget "_x" '((0 . "IMAGE"))))
      (progn
        (vlax-for x (setq ss (vla-get-activeselectionset acDoc))
          (setq images (cons (vla-get-imagefile x) images))
        )
        (vla-delete ss) ))
    images
  )
  (vla-get-ActiveDocument (vlax-get-Acad-Object))
  ))

(imgatlist)
("C:\temp\\tiff_pocketbits.tif" "C:\\temp\\事故現場写真.png" "C:\\temp\\エッチな水着.gif")


関連事項