第04章 菜单、工具栏和对话框第.pptVIP

《 Delphi 程序设计》 第1章 Delphi 2005简介 第2章 Object Pascal语言基础 第3章 Windows应用程序界面设计 第4章 菜单、工具栏和对话框 第5章 使用复杂组件 第6章 面向对象的核心特性 第7章 多文档界面设计 第8章 程序调试与异常处理 第9章 文件操作和流 第10章 多媒体应用设计 第11章 数据库应用设计 第12章 综合应用设计 第4章 菜单、工具栏和对话框 4.1 菜单 4.2 行为列表组件ActionList 4.3 工具栏与状态栏 4.4 消息框与输入框 4.5 Windows通用对话框 4.1 菜单 4.1.1 主菜单MainMenu 4.1.2 弹出式菜单PopupMenu 4.1.3 菜单图像与图像列表组件ImageList 4.1.1 主菜单MainMenu 主菜单是相对于窗口而言的，它出现在窗口的标题栏下，与窗口同时出现。 菜单设计器 菜单项的特性 菜单项的状态 复选 单选 【例4.1】 设计主菜单。 添加主菜单组件 添加菜单项 设置分隔条 子菜单 设置快捷键和加速键 设置有效状态 设置复选标志 设置单选标志 编写菜单项的事件处理程序 菜单结构 4.1.2 弹出式菜单PopupMenu 弹出式菜单是相对于控件而言的 将某个控件的PopupMenu属性设置为一个已存在的弹出式菜单 4.1.3 菜单图像与图像列表组件ImageList 图像列表组件中添加图像 菜单与图像列表组件相关联 菜单组件与图像列表组件相关联 菜单项与ImageList中的指定图像相关联 4.2 行为列表组件ActionList 行为（Action） ActionList编辑器 添加标准行为 自定义行为 【例4.2】 使用ActionList组件设计菜单。 添加系统定义的Cut、Copy和Paste等标准行为 添加组件 为ActionList添加行为 使用Action属性创建菜单项 4.3 工具栏与状态栏 4.3.1 工具栏ToolBar 4.3.2 状态栏StatusBar 4.3.1 工具栏ToolBar 创建ToolBar的按钮ToolButton 执行New Button 执行New Separator ToolBar上添加其他组件 【例4.3】 设计工具栏。 建立常用与格式工具栏，演示自定义行为的操作。 设计常用工具栏 格式工具栏上添加按钮 添加带下拉菜单的按钮 格式工具栏上添加ComboBox、SpinEdit等组件 格式工具栏的状态随着光标位置处文本字体的改变而改变 显示与隐藏工具栏 自定义行为 4.3.2 状态栏StatusBar SimplePanel属性决定单面板与多面板。 【例4.4】 设计状态栏。 添加状态栏 显示光标当前位置 显示数据修改过的状态 显示系统时间 4.4 消息框与输入框 4.4.1 消息框与信息函数 4.4.2 输入框与输入函数 4.4.1 消息框与信息函数 ShowMessage过程 procedure ShowMessage(const Msg : string); MessageDlg函数 function MessageDlg(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons;HelpCtx: integer): integer; 例如，MessageDlg(数据已经改动，是否存盘？,mtConfirmation, [mbYes,mbNO,mbCancel],1); MessageDlgPos函数 4.4.2 输入框与输入函数 InputBox函数 function InputBox(const ACaption, APrompt,ADefault:string):string; 例如，LoginName:=InputBox(登录,请输入用户名:,guest); InputQuery函数 function InputQuery(const ACaption, APrompt:string;var Value:string):Boolean; 4.5 Windows通用对话框 4.5.1 打开与保存文件对话框 4.5.2 字体与颜色对话框 4.5.3 查找与替换对话框 4.5.4 页面设置、打印与打印设置对话框 对话框组件类 4.5.1 打开与保存文件对话框 打开文件对话框（OpenDialog） 调用打开文件对话框：执行Execute方法 OpenDialog组件的属性：FileName、InitialDir 、Filter 、Options OpenDialog的主