常用组件的使用.pptVIP

2．TSaveDialog组件3．TFontDialog组件4．TColorDialog组件【例7-6】简单的文本编辑器。程序设计界面如图7-12所示。界面上有4个加速（SpeedButton）按钮，它们的功能依次是保存文件、打开文件、设置文本字体和设置文本颜色。界面上还有4个对话框组件OpenDialog、SaveDialog、FontDialog和ColorDialog组件与一个Memo组件。程序运行时，单击【保存】按钮，可以保存文件；单击【打开】按钮，可以打开一个文件；单击【字体】按钮，可以设置文本字体；单击【颜色】按钮，可以设置Memo组件中显示的文本颜色。程序运行界面如图7-13所示。图7-12程序设计界面图7-13程序运行界面7.1.6TImage组件1．TImage组件的常用属性（1）Picture属性：通过该属性可以设置在Image组件中显示的图片。（2）Stretch属性：该属性用来决定图片是否自动拉伸或缩小到与TImage组件一样大小，以填满TImage组件。2．TImage组件的常用方法（1）LoadFromFile方法：该方法用来把图片文件装载到TImage组件中，语法格式如下：procedureLoadFromFile(constFileName:string);（2）SaveToFile方法：该方法用来把TImage组件中显示的图片保存到指定的文件中去，语法格式如下：procedureSaveToFile(constFileName:string);7.1.7菜单组件1．菜单的结构图7-15菜单结构一 图7-16菜单结构二2．菜单项的常用属性?Items属性：菜单项数组属性，用来存放菜单中的菜单项。?Name属性：该属性代表的是菜单项名称。?Caption属性：该属性用来设置或返回菜单项中显示的文字。?Visible属性：该属性用来确定菜单项是否可见。?Checked属性：该属性用来确定菜单项前是否显示选中标记。?ShortCut属性：该属性用来确定菜单项的快捷键。?Enabled属性：该属性用来确定菜单项是否可以使用?Items属性：如果该菜单项还有下一级子菜单，可通过该属性来访问子菜单中的菜单项，可看作是一个TMenuItem型的数组，下标从0开始。?Count属性：如果该菜单项有下一级子菜单，可通过该属性指示下一级子菜单的菜单项的数目。3．Items属性的常用方法?Add方法：该方法用于在Items的末尾再添加一个菜单项，语法格式如下：procedureAdd(Item:TMenuItem);overload;?Delete方法：该方法用于在Items中删除指定的菜单项，语法格式如下：procedureDelete(Index:Integer);?Insert方法：该方法用来在Items的指定位置插入一个菜单项，语法格式如下：procedureInsert(Index:Integer;Item:TMenuItem);?Remove方法：删除指定的菜单项，这与Delete方法不同，语法格式如下：procedureRemove(Item:TMenuItem);?Clear属性：该属性用于删除Items属性中的所有菜单项。【例7-7】编写一个菜单演示程序，程序的设计界面如图7-19所示。程序运行时，执行【File】→【Time】命令将显示系统当前时间；执行【File】→【Exit】命令或在窗体空白处单击鼠标右键，在弹出的菜单上选择【Exit】命令即可退出应用程序。程序运行界面如图7-20和图7-21所示。图7-19程序设计界面图7-20程序运行界面图7-21程序运行界面【例7-8】动态菜单设计例。程序的设计界面如图7-22所示，程序运行时，单击【生成菜单】按钮，将动态生成一个File菜单，它包括4个菜单项：New、Open、Copy和Exit。程序运行界面如图7-23所示。图7-22程序设计界面图7-23程序运行界面7.1.8TTabControl组件和TPageControl组件的使用1．TPageControl组件的使用（1）TPageControl组件的常用属性?Pages属性：该属