《Delphi程序设计基础与上机指导讲义44355.pptx》由会员分享，可在线阅读，更多相关《Delphi程序设计基础与上机指导讲义44355.pptx（30页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、Delphi 程序设计基础与上机指导第七章 Win32 组件及系统功能调用使用菜单 分类w两类菜单n主菜单和快捷菜单 n不同的用法n不同的使用场合n相同点菜单设计器 主菜单w创建菜单组n操作步骤n菜单组的属性n菜单组的设计菜单设计器 主菜单w子菜单n新建子菜单项n新建多个子菜单项n菜单项的快捷键n菜单项的标题n菜单项的加速键n菜单项分组菜单设计器 主菜单w子菜单分组n子菜单按照功能分组n分组菜单之间的分隔符菜单设计器 主菜单w子菜单项的子菜单 n多级菜单的设计方法n菜单的分级标准n低级菜单的设计n低级菜单的命名菜单设计器 主菜单w子菜单项的图标n使用ImageList组件n管理图片列表 n为菜
2、单项设置图标n具体的实例菜单设计器 主菜单w使用菜单状态n多个菜单项的分组控制n菜单的Checked状态n使用代码控制状态的变换n具体的设计实例菜单设计器 快捷菜单w快捷菜单n没有多个菜单组n设计快捷菜单的菜单项n快捷菜单的子菜单项分组n加速键的设置菜单功能 编写代码w为菜单OnClick事件句柄编写代码n简单的实例nprocedure TfrmMain.miFileExitClick(Sender:TObject);nbeginn Close;nend;菜单功能 编写代码w切换主菜单 n根据具体内容改变主菜单n通过代码实现nprocedure TfrmMain.cbxUseMainMenuC
3、lick(Sender:TObject);nbeginn if(cbxUseMainMenu.Checked)thenn Menu:=mmuMainn elsen Menu:=nil;nend;菜单功能 快捷菜单 w如何设置快捷菜单w为快捷菜单编写代码w多个组件共享快捷菜单w快捷菜单菜单项状态的控制菜单功能 菜单状态w使用可见状态 n使用可见状态可以控制菜单的可见性n在设计时刻可以设置菜单项的初始状态n使用代码控制菜单的可见性：nprocedure TfrmMain.pmuEditPopup(Sender:TObject);nbeginn miCut.Visible:=(retContent.
4、SelLength 0);n miCopy.Visible:=(retContent.SelLength 0);n miPaste.Visible:=(Clipboard.AsText );nend;菜单功能 菜单状态w使用可用状态 n通过Enable属性控制菜单项是否可用n在设计时刻可以初始化菜单项的状态n使用代码可以控制菜单项的状态：nprocedure TfrmMain.pmuEditPopup(Sender:TObject);nbeginnn miCut.Visible:=(retContent.SelLength 0);n miCopy.Visible:=(retContent.Se
5、lLength 0);n miPaste.Visible:=(Clipboard.AsText );nn miCut.Enabled:=(retContent.SelLength 0);n miCopy.Enabled:=(retContent.SelLength 0);n miPaste.Enabled:=(Clipboard.AsText );nend;菜单功能 思考w除了使用菜单设计器菜单，所有菜单都可以通过代码动态的创建！工具栏 设计w设计工具栏n选择CoolBar组件n添加工具栏组件n设置工具栏的ImageList属性n创建工具按钮n设置工具按钮的属性n设置工具按钮的图标工具栏 使用
6、w工具栏与菜单的结合n设置工具栏的List属性n设置工具栏的ShowCaptions属性n设置菜单项与工具按钮的对应关系工具栏 特殊用法w工具栏特殊用法 n工具栏组件的Flat属性 n工具栏组件的ShowCaptions属性n在工具栏组件上放置其他特殊组件n为工具按钮编写代码n具体实例程序状态栏 单面板状态栏w特殊形状的窗口 n打开菜单设计器窗口n为菜单项设置提示信息属性n设置菜单项的ShowHint属性n添加函数函数DisplayHint n为应用程序设置OnHint事件句柄状态栏 多面板状态栏w多面板状态栏n设置多面板n设置面板的对齐和宽度等属性n设置状态栏的文字n通过代码设置属性n简单实
7、例工具栏和状态栏 思考w完善实例程序列表视图框 设计w设计列表视图框n使用ViewStyle属性n创建多个列表项n为列表项设置图标n设置列表项的宽度、对齐方式n利用代码控制列表项n实例程序列表视图框 编码w控制列表视图框n用代码添加和删除列表项n用代码改变列表的显示方式n比较完整的实例程序树状列表框 列表w控制树状列表nAddChildObjectnAddChildnAddChildFirstnAddChildObjectFirstw递归方法树状列表框 思考w完善文件列表框定时触发器 用法w定时触发器 n设置定时间隔 n设置定时器的状态n使用定时触发器显示时间n定时触发器的计时功能媒体播放器 用法w媒体播放器 n界面定制n自动播放媒体n媒体类型媒体播放器 进度控制w使用代码控制进度nBack、Pause、Rewind、Close、PauseOnly、StartRecording、Eject、Play、Step、Next、Previous、Stop、Open、Resume 系统组件 思考w完善实例程序演讲完毕，谢谢观看！