delphi几个常用的vcl组件使用实例|方法

另存为对话框组件（TSaveDialog）
TSaveDialog 组件用于显示一个“另存为?”对话框，让用户选择可输入一个要保存的文件名。它是直接从对象TOpenDialog 中导出来的，继承了TOpenDialog 对象的一切属性、事件和方法。
打开图像对话框组件（TOpenPictureDialog）
TOpenPictureDialog 组件用于显示一个模式对话框，用以选择打开图像的文件名，它是从对象TOpenDialog 中导出来的，它的外观与“打开”对话框很相似，只是增加了一个图像预览区域。如果被选择的图像能够由TPicture 读取，它将显示在预览区内，如图6-16 所示。TPicture 可支持的文件格式有：位图（.bmp）、图标（.ico）、Windows 图元文件（.wmf）以及增强的Windows 图元文件（.emf）等。如果被选择的图像不能显示，预览区内将显示“None”，如果选择一个不能识别的图像格式，将产生一个EInvalidGraphic 异常。
图像另存为对话框（TSavePictureDialog）
TSavePictureDialog 组件用于显示一个模式对话框，用于选择要保存的图像的文件名，它是从对象TOpenDialog 中导出来的，它的外观与“另存为?”对话框很相似，只是增加了一个图像预览区域。如果被选择的图像能够由TPicture 读取，它将显示在预览区内。TPicture 可支持的文件格式有：位图（.bmp）、图标（.ico）、Windows 图元文件（.wmf）以及增强的Windows 图元文件（.emf）等。如果被选择的图像不能显示，预览区内将显示“None”字样，如果选择一个不能识别的图像格式，将产生一个EInvalidGraphic 异常。
字体对话框（TFontDialog）
TFontDialog 组件显示一个字体选择对话框，如果用户要选择字体，就要打开“字体”对话框。通过该对话框，用户可以设置字体的名称、大小以及风格等信息。“字体”对话框是用TFontDialog 组件实现的。
·Font 指示选择的字体
·MaxFontSize 指示最大允许的字体尺寸
·MinFontSize 指示最小允许的字体尺寸
·Options 字体选择对话框的选项，用以确定对话框的外观与行为
下面介绍程序中TFontDialog 组件的常用属性。
（1）Font 属性
此属性用于指定一种字体，对话框打开时这种字体将出现在对话框的“字体“框内。当然，用户可以选择其他字体。当用户单击“OK”按钮返回后，Font 属性就是用户新选择的字体。
（2）Options 属性
Options 属性用于设置“字体”对话框的选项。它有如下16 个用户可选值。
• fdAnsiOnly：对话框中只列出使用ansi 字符集的字体。
• fdApplyButton：对话框中将显示“应用”按钮。
• fdEffects：对话框中将显示“效果”复选框和“颜色”列表。
• fdFixedPitchOnly：对话框中只列出等宽字体。
• fdForceFontExist：用户必须输入一个合法的字体名，否则将显示一个警告框。
• fdLimitSize：使MinFontSize 属性和MaxFontSize 属性设置有效。
• fdNoFaceSel：对话框打开时，“字体”组合框中不预先选定一种字体。
• fdNoOEMFonts：对话框中不列出矢量字体。
• fdScalableOnly：对话框只列出可以缩放的字体。
• fdNoSimulations：对话框不列出GDI 仿真字体。
• fdNoSizeSel：对话框的“大小”组合框不预先选定一种风格。
• fdNoStyleSel：对话框的“字体样式”组合框不预先选定一种风格。
• fdNoVectorFonts：与fdNoOEMFonts 相同。
• fdShowHelp：对话框中将显示“帮助”按钮。
• fdTrueTypeOnly：对话框中只列出TrueType 字体。
• fdWysiwyg：对话框中只列出所见即所得的字体。
TFontDialog 组件的OnApply 事件在用户单击对话框中的“应用”按钮时触发。在处理这个事件的句柄中，可以把用户选择的字体赋给某个组件的Font 属性，这样在不退出对话框的情况下就可以看到新字体的效果。