Vla-get-imagefile

提供:GizmoLabs - だいたい CAD LISP なサイト
2013年11月20日 (水) 14:45時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (va-get-imagefile ''vla-object'') ; 機能 : ラスター イメージ ファイルのフルパスとファイル名を取得する。 ; 引...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(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")


関連事項