通用對話框控件

1、通用對話框工程工程/部件部件 選定部選定部件標(biāo)簽件標(biāo)簽選定選定Microsoft CommDialog Control 6.0 通用對話框添加到工具箱通用對話框添加到工具箱確定確定 通用對話框控件是一種ActiveX控件，可以用來產(chǎn)生如打開、保存、字體等通用對話框。如下圖“打開”對話框“字體”對話框 通用對話框一、通用對話框的基本屬性和方法一、通用對話框的基本屬性和方法 通用對話框可以提供通用對話框可以提供6種形式的對話框，通過設(shè)置種形式的對話框，通過設(shè)置Action屬性屬性值或調(diào)用值或調(diào)用Show方法方法來建立不同類型的對話框。如下表：來建立不同類型的對話框。如下表：1 屬性屬性 Actio

2、n屬性屬性：數(shù)值型，決定打開何種類型的對話框（見上表）：數(shù)值型，決定打開何種類型的對話框（見上表） DialogTiltle屬性屬性：對通用話框標(biāo)題。：對通用話框標(biāo)題。CancelError屬性：邏輯型值，表示用戶在與對話框進(jìn)行信息屬性：邏輯型值，表示用戶在與對話框進(jìn)行信息交換時(shí)，按下交換時(shí)，按下“取消取消”按鈕時(shí)是否產(chǎn)生出錯(cuò)信息。按鈕時(shí)是否產(chǎn)生出錯(cuò)信息。 True：選擇：選擇“取消取消”按鈕，出現(xiàn)錯(cuò)誤警告；按鈕，出現(xiàn)錯(cuò)誤警告； Err置為置為32755 (cdlCancel) 。 False(缺省缺省)：選擇：選擇“取消取消”按鈕，沒有錯(cuò)誤警告。按鈕，沒有錯(cuò)誤警告。2 通用對話框的方法通用對

3、話框的方法 除了除了Acton屬性，屬性，VB還提供了一組方法用來打開不同類型還提供了一組方法用來打開不同類型對話框?qū)υ捒?ShowOpen ShowSave ShowColor ShowFont ShowPrinter ShowHelp 通用對話框?qū)傩?1 FileName(文件名稱）屬性文件名稱）屬性：在程序中可用該屬性值設(shè)置或返回用戶所選定的文件名（包含路徑） 2 FileTitle（文件標(biāo)題）屬性（文件標(biāo)題）屬性：在程序中可用該屬性值設(shè)置或返回用戶所選定的文件名（不包含路徑） .1 “打開打開”/“另存為另存為”對話框?qū)υ捒駾ialogTiltleFileName InitDirFil

4、terFilterIndexDefaultExt 3 Filter（過濾器）屬性：（過濾器）屬性：確定文件列表框中所顯示文件的確定文件列表框中所顯示文件的類型，該屬性的值顯示在類型，該屬性的值顯示在“文件類型文件類型”列表框中。如設(shè)置其值列表框中。如設(shè)置其值為：為： Cocuments(*.DOC)|*.DOC|Text Files(*.TXT)|*.txt|All Files|(*.*) 則在則在“文件類型文件類型”列表框顯示下列三種文件類型以供用戶列表框顯示下列三種文件類型以供用戶選擇選擇 Cocuments(*.DOC) 擴(kuò)展名為擴(kuò)展名為DOC的的Word文件文件 Text Files(

5、*.TXT) 擴(kuò)展名為擴(kuò)展名為TXT的文本的文本文件文件 All Files|(*.*) 所有所有文件文件 通用對話框 4 FilterIndex（過濾器索引）屬性（過濾器索引）屬性：為整型值，表示：為整型值，表示用戶在文件類型列表框選定了第幾組文件類型。用戶在文件類型列表框選定了第幾組文件類型。 5 InitDir（初始化路徑）屬性（初始化路徑）屬性：該屬性用來指定打開：該屬性用來指定打開對話框中的初始目錄，若不設(shè)置，系統(tǒng)則默認(rèn)為對話框中的初始目錄，若不設(shè)置，系統(tǒng)則默認(rèn)為“C:My Documents”。 6DefaultExt屬性屬性：字符型，用于確定保存文件的缺：字符型，用于確定保存文件

6、的缺省擴(kuò)展名。省擴(kuò)展名。 7CancelError屬性屬性：邏輯型值，表示用戶在與對話：邏輯型值，表示用戶在與對話框進(jìn)行信息交換時(shí)，按下框進(jìn)行信息交換時(shí)，按下“ “取消取消” ”按鈕時(shí)是否產(chǎn)生出錯(cuò)信息。按鈕時(shí)是否產(chǎn)生出錯(cuò)信息。 通用對話框例例710 設(shè)計(jì)一個(gè)簡單圖片查看器設(shè)計(jì)一個(gè)簡單圖片查看器.2 “顏色顏色”對話框?qū)υ捒?顏色對話框是當(dāng)顏色對話框是當(dāng)Action值為值為3時(shí)的通用時(shí)的通用對話框，如右圖。對話框，如右圖。 重要屬性重要屬性 Color：用來返回或設(shè)置選定的顏色。用來返回或設(shè)置選定的顏色。 例例10.3 例例 中中“顏色顏色.”按鈕的事件過按鈕的事件過程程Private Sub

7、cmdColor_Click() CommonDialog1.Action = 3 打開顏對話框打開顏對話框 Text1.ForeColor = CommonDialog1.Color End Sub 通用對話框.3 “字體字體”對話框?qū)υ捒?字體對話框是字體對話框是Action為為4時(shí)時(shí)的通用對話框，如下圖所示，提的通用對話框，如下圖所示，提供用戶選擇字體、字號及字體樣式等。供用戶選擇字體、字號及字體樣式等。字體對話框重要的屬性有：字體對話框重要的屬性有：Color, FontName, FontSize, FontBold FontItalic , FontStrikethru, Font

8、Underline, Max等等. FontName FontBold、FontItalicFontSizeFontStrikethruFontUnderline ColorMin、Max 通用對話框Flags屬性：屬性：設(shè)置所顯示的字體類型，設(shè)置所顯示的字體類型，數(shù)據(jù)類型為數(shù)據(jù)類型為Long。 注意注意 在顯示在顯示“字體字體”對話框前，必須先將對話框前，必須先將 Flags 屬性屬性設(shè)置為設(shè)置為 cdlCFScreenFonts，cdlCFPrinterFonts，或，或cdcdlCFBoth。否則，會發(fā)生字體不存在的錯(cuò)誤。否則，會發(fā)生字體不存在的錯(cuò)誤。 Flages屬性應(yīng)取下列值：屬性應(yīng)

9、取下列值： cdlCFScreenFonts&H1屏幕字體屏幕字體 cdlCFPrinterFonts &H2打印機(jī)字體打印機(jī)字體 cdlCFBoth&H3打印機(jī)字體和屏幕字體。打印機(jī)字體和屏幕字體。 cdlCFEffects &H100 顯示刪除線和下劃線檢查框以及顏色組合框顯示刪除線和下劃線檢查框以及顏色組合框 通用對話框例中例中“字體字體.”按鈕的事件過程按鈕的事件過程Private Sub cmdFont_Click( ) CommonDialog1.Flags = cdlCFBoth Or cdlCFEffects CommonDialog1.Acti

10、on = 4 .End Sub 通用對話框.4 “打印打印”對話框?qū)υ捒?打印對話框是當(dāng)打印對話框是當(dāng)Action為為5時(shí)時(shí)的的通用對話框，是一個(gè)標(biāo)準(zhǔn)打印對話通用對話框，是一個(gè)標(biāo)準(zhǔn)打印對話窗口界面，如右圖。窗口界面，如右圖。屬性屬性FromPage：整型，起始頁號整型，起始頁號Topage：整型，終止頁號整型，終止頁號Copies：整型，打印份數(shù)整型，打印份數(shù) 如果打印驅(qū)動(dòng)程序不支持多份如果打印驅(qū)動(dòng)程序不支持多份 打印，該屬性有可能始終返回打印，該屬性有可能始終返回 1。 FromPageTopageCopies 注意：打印對話框本身不能處理打印工作，僅僅是一個(gè)供用戶選注意：打印對話框本身不能

11、處理打印工作，僅僅是一個(gè)供用戶選擇打印參數(shù)的界面，所選參數(shù)存于各屬性中，再通過編程來處理打印擇打印參數(shù)的界面，所選參數(shù)存于各屬性中，再通過編程來處理打印操作。操作。例例 中中“打印打印.”按鈕的事件過程按鈕的事件過程.5 “幫助幫助”對話框?qū)υ捒?幫助對話框是當(dāng)幫助對話框是當(dāng)Action為為6時(shí)的對話框，是一個(gè)標(biāo)準(zhǔn)的對時(shí)的對話框，是一個(gè)標(biāo)準(zhǔn)的對話窗口用于制作應(yīng)用程序的在線幫助。話窗口用于制作應(yīng)用程序的在線幫助。 幫助文件需要用其它的工具制作，幫助文件需要用其它的工具制作， 如如Microsoft Windows Help Compiler。 屬性屬性1 HelpCommand（幫助命令）屬性（

12、幫助命令）屬性：用于返回或設(shè)置需要的：用于返回或設(shè)置需要的在線在線Help幫助類型。幫助類型。2 HelpFile（幫助文件）屬性（幫助文件）屬性：用于指定已制作好的幫助文件：用于指定已制作好的幫助文件的路徑及文件名的路徑及文件名3HelpKey（幫助關(guān)鍵字）屬性（幫助關(guān)鍵字）屬性：用于指定幫助信息的內(nèi)容，：用于指定幫助信息的內(nèi)容， 幫助窗口中顯示由該幫助關(guān)鍵字指定的幫助信息。幫助窗口中顯示由該幫助關(guān)鍵字指定的幫助信息。4 HelpContext（幫助上下文）屬性：（幫助上下文）屬性： 通用對話框 設(shè)計(jì)一個(gè)窗體，包含設(shè)計(jì)一個(gè)窗體，包含1個(gè)文本框（個(gè)文本框（Text1）和）和6個(gè)分別為個(gè)分別為 “打開打開”（cmdOpen）、）、“另存為另存為”（cmdSave）、）、“顏色顏色”（cmdColor）、）、“字體字體”（cmdFont）、）、“打印打印”（cmdPrinter）和）和“幫助幫助”（cmdHelp）命令按鈕。本例中僅）命令按鈕。本例中僅涉及前兩種對