Delphi程序设计教程 作者 吕新平 冯祖洪 张强华 第八章.pptVIP

第8章 各种对话框的制作 8.1 定制对话框 8.2 打开对话框组件（OpenDialog） 8.3 保存对话框组件（SaveDialog） 8.4 字体对话框组件（FontDialog） 8.5 颜色对话框组件(ColorDialog) 8.6 打印对话框组件（PrintDialog） 8.7 打印机设置对话框组件（PrinterSetupDialog） 8.8 查找对话框组件（FindDialog） 8.9 替换对话框组件（ReplaceDialog） 8.1 定制对话框 8.1.1 对话框的分类 1. 模式对话框 在打开对话框之后，必须回答对话框的提问，然后才能进行其它的操作。也就是使用“确定”或“取消”按钮关闭对话框之前，不能对程序的其它部分进行操作。 Windows中的大部分对话框都属于模式对话框，如打开对话框、保存对话框等。 2. 无模式对话框 在打开对话框之后，用户可以继续进行其它的操作，而不必首先响应对话框。 Windows中的查找、替换对话框属于无模式对话框。 8.1.2 对话框组件 Dialog页标签中包含了创建标准的Windows公共对话框的组件。 8.2 打开对话框组件（OpenDialog） 8.2.1 打开对话框组件的属性 1. DefaultExt属性 若用户在文件名中没有包含后缀，使用DefaultExt属性可以将后缀自动地添加到文件名编辑框的文件名中。若在文件名中指定后缀，则忽略DefaultExt属性。若DefaultExt属性的值为空，则不添加后缀。 2. FileName属性 FileName属性确定当出现打开文件对话框时，出现在文件名编辑框中的文件名。用户可选定这一文件名或指定其它的文件名，在用户指定文件名并选择确定按钮后，用户选定的文件名保存在FileName属性中。 FileName属性可以为在当前目录中不存在的文件，也就是允许用户打开新的文件。而在保存文件对话框中，用户可以保存以前没有保存过的文件。 3. Filter属性 Filter属性允许用户筛选（用筛选字符串）出现在文件名列表中的文件。改变Filter属性的值可以开关筛选功能。 筛选字符串的语法与SQL语句中WHERE子句的语法是类似的。 Filter Editor对话框如图8-1所示。 在Filter Editor对话框中的筛选名中输入的内容显示在打开文件对话框的文件类型下拉列表框中。 4. FilterIndex属性 该属性为整型量，用来确定出现在文件列表下拉列表框中的筛选文件（由Filter属性指定）为第几个。默认值为1，即第一个筛选的文件出现在下拉列表框中。若指定的值大于Filter属性指定的文件筛选数，则使用默认值。 5．InitialDir属性 该属性为字符串型，用来确定出现对话框时的当前目录（InitialDir属性指定的目录）。在出现对话框后，用户可以使用目录树来改变目录。 指定的目录应为绝对路径。 若不指定初始的目录，则使用出现对话框时的当前目录，若指定的目录不存在时，也是如此。 6．Options属性 Options属性中包含有出现在打开文件及保存文件对话框中选项集中的所有可能值。 7．Title属性 该属性为字符串型，用来确定出现在对话框标题栏上的文本。 8.2.2 调用打开文件对话框的方法 要调用打开文件对话框，在要使用打开文件对话框的相应事件处理程序中使用Execute方法即可，其语法为： OpenDialog1.Execute; 其中，OpenDialog1为打开文件对话框的Name属性的值。 8.3 保存对话框组件（SaveDialog） 8.3.1 保存对话框组件的属性 1．Filter属性 使用Filter属性可以筛选出现在保存文件对话框中的可见文件列表，然后使用文件类型列表组合框确定出现在文件列表中的文件。使用FilterIndex属性可以设置默认的筛选。 2．Options属性 使用Options属性可使用户选择多个文件，从而Files属性中包含所有选定的文件，同时使用Options属性可以定制保存文件对话框的表现与外观。 3．DefaultExt属性 使用DefaultExt属性可以使得文件名的后缀自动添加到文件名编辑框中。 8.3.2 调用保存文件对话框的方法 要调用保存文件对话框，在要使用保存文件对话框的相应事件处理程序中使用Execute方法即可，其语法为：