プログラム言語 FreeBasic |
ShellFolder
ShellFolder(titledialog, defaultfolder , [flag = BIF_RETURNONLYFSDIRS Or BIF_USENEWUI] )
Function ShellFolder(byRef NameDialog as string, ByRef DefaultFolder as String, ByVal FlagOption As Integer=BIF_RETURNONLYFSDIRS Or BIF_USENEWUI, ByVal hParentWin as HWND = 0) as String
すべてのディレクトリ(ドライブ、フォルダ)を表示するダイアログボックス。
titledialog - フレームウィンドウのメッセージ
defaultfolder - デフォルトのディレクトリ
FLAG - 使えるかもしれません。 (主要なもののみ。残りはこちらを参照下さい→BROWSEINFO structure):
BIF_BROWSEFORCOMPUTER (4096) - ユーザーのみがコンピュータのネットワーク環境を選択することができます。
BIF_BROWSEFORPRINTER (8192) - プリンタと同じ
BIF_DONTGOBELOWDOMAIN (2)- ネットワーク・ドメイン外でない
BIF_RETURNFSANCESTORS (8)- システムのサブフォルダのみを返す
BIF_RETURNONLYFSDIRS (1)- システムフォルダのみを返す
BIF_BROWSEINCLUDEFILES (16384)- 表示するファイルが含まれています
BIF_USENEWUI (80)- 新しいユーザーインターフェース
hParentWin - 親ウィンドウのハンドル
Windows
例:
#Include "window9.bi"
? ShellFolder( "Select Folder", "C:\")
sleep