Acet-file-readdialogのソースを表示

{{AutoLISP}}
; 構文
: (acet-file-readdialog ''title'' ''default-name''  ''extension''  ''flags'' )


; 機能
: ファイル選択ダイアログボックス（ファイルを開くダイアログ）を表示し、ユーザーがファイルを選択できるようにする。
: [[getfiled]] 関数でいいと思う。 


; 引数
:* title : ダイアログボックスのタイトルバーに表示される文字列。
:* default-name : ファイル名フィールドに最初に表示されるデフォルトのファイル名。
:* extension : デフォルトのファイル拡張子フィルター。例: "dwg;dxf"
:* flags : ダイアログボックスの動作を制御するフラグのビットコード。[[getfiled]]　を参照。
:** 1: 存在しないファイルを許可する。
:** 4: ネットワークドライブの非表示を無効にする。


; 戻り値
: 選択されたファイルの完全なパス（文字列）。それ以外は nil を返す。



; サンプル
<pre class="brush:autolisp;">
(defun c:test-readdialog ()
  (setq file-path
    (acet-file-readdialog
      "図面ファイルを選択"
      "DefaultDrawing.dwg"
      "dwg"
      1
    )
  )
  (if file-path
    (progn
      (princ "\n選択されたファイル: ")
      (princ file-path)
    )
    (princ "\nファイル選択がキャンセルされました。")
  )
  (princ)
)
</pre>

-----
関連事項
* [[Expresstools関数]]
* [[acet-file-find]]
* [[acet-file-find-font]]
* [[acet-file-find-image]]
* [[acet-file-find-on-path]]
* [[acet-file-writedialog]]
* [[getfiled]]

[[Category:AutoLISP]]
[[Category:BricsCADのLISP]]