Acet-file-find-on-path
- 構文
- (acet-file-find-on-path filename [ search-acad-path ])
- 機能
- 指定されたファイルをCADのサポートファイル検索パス上で検索する。オプションの引数により、CADの標準パスを含めるかどうかを制御できる。
- 引数
-
- filename : 検索するイメージファイルの名前の文字列。
- search-acad-path : nil以外を指定すると、CADの標準サポートパスも検索対象に含める。デフォルトは T。
- 戻り値
- 見つかった場合ファイルの完全なパス（文字列）、それ以外は nil を返す。
- サンプル
(defun c:test-find-on-path ()
(setq file-to-find "acad.lin")
(if (setq found-path (acet-file-find-on-path file-to-find))
(progn
(princ "\nファイルあったよ: ")
(princ found-path)
)
(princ (strcat "\nファイル " file-to-find " はなかったよ。"))
)
(princ)
)
関連事項