「Vla-get-imagefile」の版間の差分

2013年11月20日 (水) 14:45時点における版

AutoLISP Home - AutoLISP 目次 - DCL - AutoLisp関数互換表 - CAD&CGブログ - オンラインショップ- GizmoTools ヘルプセンター

構文: (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")