語法
object.Flags [= value]
Flags 屬性語法有下列部分:
部分描述
object 對象表達式,其值是“套用於”列表中的對象。
value 如“設定值”中所描述,是為“打開”和“另外儲存為”對話框指定選項的常數或值。
設定值
Value 的設定值是:
常數 值 描述
cdlOFNAllowMultiselect &H200 它指定檔案名稱列表框允許多重選擇。
運行時,通過按 SHIFT 鍵以及使用 UP ARROW 和 DOWN ARROW 鍵可選擇多個檔案。作完此操作後,FileName 屬性就返回一個包含全部所選檔案名稱的字元串。串中各檔案名稱用空格隔開。
cdlOFNCreatePrompt &H2000 當檔案不存在時對話框要提示創建檔案。該標誌自動設定 cdlOFNPathMustExist 和 cdlOFNFileMustExist 標誌。
cdlOFNExplorer &H80000 它使用類似資源管理器的打開一個檔案的對話框模板。適用於 Windows 95 和 Windows NT 4.0。
CdlOFNExtensionDifferent &H400 它指示返回的檔案擴展名與 DefaultExt 屬性指定的擴展名不一致。如果 DefaultExt 屬性是 Null,或者擴展相匹配,或者沒有擴展時,此標誌不設定。當關閉對話框時,可以檢查這個標誌的值。
cdlOFNFileMustExist &H1000 它指定只能輸入檔案名稱文本框已經存在的檔案名稱。如果該標誌被設定,則當用戶輸入非法的檔案名稱時,要顯示一個警告。該標誌自動設定 cdlOFNPathMustExist 標誌。
cdlOFNHelpButton &H10 使對話框顯示幫助按鈕。
cdlOFNHideReadOnly &H4 隱藏唯讀複選框。
cdlOFNLongNames &H200000 使用長檔案名稱。
cdlOFNNoChangeDir &H8 強制對話框將對話框打開時的目錄置成當前目錄。
CdlOFNNoDereferenceLinks &H100000 不要間接引用外殼連結(也稱作捷徑)。預設時,選取外殼連結會引起它被外殼間接引用。
cdlOFNNoLongNames &H40000 無長檔案名稱。
CdlOFNNoReadOnlyReturn &H8000 它指定返回的檔案不能具有隻讀屬性,也不能在防寫目錄下面。
cdlOFNNoValidate &H100 它指定公共對話框允許返回的檔案名稱中含有非法字元。
cdlOFNOverwritePrompt &H2 使“另外儲存為”對話框當選擇的檔案已經存在時應產生一個信息框,用戶必須確認是否覆蓋該檔案。
cdlOFNPathMustExist &H800 它指定只能輸入有效路徑。如果設定該標誌,輸入非法路徑時,應顯示一個警告信息。
cdlOFNReadOnly &H1 建立對話框時,唯讀複選框初始化為選定。該標誌也指示對話框關閉時唯讀複選框的狀態。
cdlOFNShareAware &H4000 它指定忽略共享衝突錯誤。
說明
無論是在 Windows NT 4.0 還是在 Windows 95 中,如果不選取 cdlOFNAllowMultiselect 標誌,cdlOFNExplorer 和 cdlOFNLongNames 標誌均沒有意義,並且實際上是預設值。
無論是在 Windows NT 4.0 還是在 Windows 95 中,如果 cdlOFNAllowMultiselect 標誌被單獨使用,都不能支持長檔案名稱。這是因為多重檔案名稱要復現空格分隔設定,而長檔案名稱也可能包括空格符。在 Windows NT 3.5 中,無法避免這種情況。如果使用 cdlOFNAllowMultiselect,就不能看到長檔案名稱。如果在 Windows 95 中添加 cdlOFNExplorer 標誌,就可以既能檔案多選,又能看到長檔案名稱。但是,這些檔案名稱顯現空字元分隔設定,而不是空格分隔設定隔開。因此,cdlOFNAllowMultiselect 和 cdlOFNExplorer 一起使用時,在 Windows 95 和 Windows NT 4.0 中需要不同的檔案名稱所得結果的語法分析。
這些常數在對象瀏覽器中的 Microsoft CommonDialog 控制項 (MSComDlg) 對象庫中列出。
也可以定義所選擇的標誌。應使用啟動窗體聲明部分的 Const 關鍵字來定義想使用的標誌。例如:
Const ReadOnly = &H00000001&
Const Effects = &H00000100&
CommonDialog1.Flags = &H10& Or &H200&
將所需常數值能相加產生同樣的結果。下例與上例等效:
CommonDialog1.Flags = &H210&