Delphi课件第4节.ppt

内容提要 4.1 Delphi7内建的对话框函数 4.1.1 ShowMessage函数 4.1.2 ShowMessagePos函数 4.1.3 ShowMessageFmt 函数 4.1.4 MessageDlg 函数 4.1.5 MessageDlgPos 函数 4.1.6 MeaageDlgPosHelp 函数 4.1.7 MessageBox 函数 4.1.8 InputBox 函数 4.1.9 InputQuery 函数 4.2 Delphi 通用对话框 4.2.1 TOpenDialog 和 TSaveDialog组件 4.2.1 TOpenDialog 和 TSaveDialog组件 4.2.1 TOpenDialog 和 TSaveDialog组件 4.2.2 TOpenPictureDialog组件和TSavePictureDialog组件 4.2.3 TFontDialog和TColorDialog 4.2.4 TFindDialog Componement和TReplaceDialog Componement FindDialog 组件为应用程序提供查找对话框；ReplaceDialog 对话框组件是从 FindDialog 派生的，是 FindDialog 组件的扩展版本。它既能够让用户查找，也能让用户替换字符串。 两个对话框组件也是用 Execute 方法打开。 ? 4.2.5 TPrintDialog 和TPrinterSetupDialog TPrintDialog 组件通过调用 Execute 方法显示一个标准的Windows 打印对话框，如图 4-18 所示。在对话框中，用户可以选择打印机、打印页数和打印份数等。 有关 TPrintDialog 组件的属性介绍如下： （1）Copies 属性：该属性决定打印的份数。 （2）MaxPage 属性：该属性限制打印的最大页数。 （3）MinPage 属性：该属性限制打印的最小页数。 （4）PrintRange 属性：该属性决定选择打印范围的方式。 （5）FromPage 属性：当 PrintRange 属性取 prPageNums 值时，该属性确定打印的起始页码。 （6）ToPage 属性：当 PrintRange 属性取 prPageNums 值时，该属性确定打印的终止页码。 （7）Collate 属性：决定在打印多份文件时，是否进行相互校对。 （8）PrintToFile 属性：该属性决定是否将内容打印到一个文件中。 （9）Options 属性：该属性决定打印对话框的显示形式。该属性是集合类型，其取值及相应含义如表4-13 所示。 4.3 多重窗体设计 在前面我们学习了 Delphi 提供的对话框，包括系统内建的消息框和通用的对话框组件。对话框是一种特殊的窗口，在设计时，对话框一般用二级窗体，主要使用的是模态窗口。对话框和其他窗口相比特点是：一般没有系统菜单，没有最大化和最小化按钮，不能改变大小等。如果想将一个窗体做为一个自定义的对话框，将其BorderStyle属性设定为bsDialog即可。 由此可看出对话框的设计实际上也是多窗体的设计。但在实际中，除了使用对话框之外，多数应用程序都需要有多个窗体，所以掌握多窗体程序设计的方法是非常重要的。 4.3.1 多重窗体的管理 要设计管理多个窗体的 Windows 应用程序，必须在设计程序时创建多个窗体。所以多重窗体的管理主要是向工程中添加、删除和保存窗体。 1.添加窗体 向当前工程中添加一个标准的新窗体大致有以下几种方法： 从【File】菜单中选取【New】|【Form】命令选项。新窗体的默认名称(Name) 和标题（Caption）均由 Delphi 集成开发环境自动确定，如按顺序第二个创建的窗体其默认名称为 Form2，标题为 Form2。 在 Standard 工具栏上单击 【New Items】命令按钮，从弹出的 New Items 对话框中选择 New 标签页，再从中选择 Form 选项，单击 OK 按钮。 在 View 工具栏上直接单击 【New Form】命令按钮，也可创建一个新窗体。 Delphi 可以通过对已经存在的窗体进行复制、继承或引用等方法来创建新窗体。窗体的继承见图4-22 所示。 4.3.2 设置多重窗体的主窗体 对于包含有多个窗体的 Delphi 应用程序，必须设定一个主窗体作为启动窗体。Delphi 在创建一个新工程时，把窗体 Form1 作为系统默认的主窗体。如果程序员在实际开发过程中或在调试程序过程中希望把某个窗体作为主窗体时，即在程序运行时首先出