您好,欢迎访问三七文档
当前位置:首页 > 商业/管理/HR > 其它文档 > Delphi 程序设计基础与上机指导演讲稿 第07章
Delphi程序设计基础与上机指导第七章Win32组件及系统功能调用使用菜单-分类两类菜单主菜单和快捷菜单不同的用法不同的使用场合相同点菜单设计器-主菜单创建菜单组操作步骤菜单组的属性菜单组的设计菜单设计器-主菜单子菜单新建子菜单项新建多个子菜单项菜单项的快捷键菜单项的标题菜单项的加速键菜单项分组菜单设计器-主菜单子菜单分组子菜单按照功能分组分组菜单之间的分隔符菜单设计器-主菜单子菜单项的子菜单多级菜单的设计方法菜单的分级标准低级菜单的设计低级菜单的命名菜单设计器-主菜单子菜单项的图标使用ImageList组件管理图片列表为菜单项设置图标具体的实例菜单设计器-主菜单使用菜单状态多个菜单项的分组控制菜单的Checked状态使用代码控制状态的变换具体的设计实例菜单设计器-快捷菜单快捷菜单没有多个菜单组设计快捷菜单的菜单项快捷菜单的子菜单项分组加速键的设置菜单功能-编写代码为菜单OnClick事件句柄编写代码简单的实例procedureTfrmMain.miFileExitClick(Sender:TObject);beginClose;end;菜单功能-编写代码切换主菜单根据具体内容改变主菜单通过代码实现procedureTfrmMain.cbxUseMainMenuClick(Sender:TObject);beginif(cbxUseMainMenu.Checked)thenMenu:=mmuMainelseMenu:=nil;end;菜单功能-快捷菜单如何设置快捷菜单为快捷菜单编写代码多个组件共享快捷菜单快捷菜单菜单项状态的控制菜单功能-菜单状态使用可见状态使用可见状态可以控制菜单的可见性在设计时刻可以设置菜单项的初始状态使用代码控制菜单的可见性:procedureTfrmMain.pmuEditPopup(Sender:TObject);beginmiCut.Visible:=(retContent.SelLength0);miCopy.Visible:=(retContent.SelLength0);miPaste.Visible:=(Clipboard.AsText'');end;菜单功能-菜单状态使用可用状态通过Enable属性控制菜单项是否可用在设计时刻可以初始化菜单项的状态使用代码可以控制菜单项的状态:procedureTfrmMain.pmuEditPopup(Sender:TObject);begin{miCut.Visible:=(retContent.SelLength0);miCopy.Visible:=(retContent.SelLength0);miPaste.Visible:=(Clipboard.AsText'');}miCut.Enabled:=(retContent.SelLength0);miCopy.Enabled:=(retContent.SelLength0);miPaste.Enabled:=(Clipboard.AsText'');end;菜单功能-思考除了使用菜单设计器菜单,所有菜单都可以通过代码动态的创建!工具栏-设计设计工具栏选择CoolBar组件添加工具栏组件设置工具栏的ImageList属性创建工具按钮设置工具按钮的属性设置工具按钮的图标工具栏-使用工具栏与菜单的结合设置工具栏的List属性设置工具栏的ShowCaptions属性设置菜单项与工具按钮的对应关系工具栏-特殊用法工具栏特殊用法工具栏组件的Flat属性工具栏组件的ShowCaptions属性在工具栏组件上放置其他特殊组件为工具按钮编写代码具体实例程序状态栏-单面板状态栏特殊形状的窗口打开菜单设计器窗口为菜单项设置提示信息属性设置菜单项的ShowHint属性添加函数函数DisplayHint为应用程序设置OnHint事件句柄状态栏-多面板状态栏多面板状态栏设置多面板设置面板的对齐和宽度等属性设置状态栏的文字通过代码设置属性简单实例工具栏和状态栏-思考完善实例程序列表视图框-设计设计列表视图框使用ViewStyle属性创建多个列表项为列表项设置图标设置列表项的宽度、对齐方式利用代码控制列表项实例程序列表视图框-编码控制列表视图框用代码添加和删除列表项用代码改变列表的显示方式比较完整的实例程序树状列表框-列表控制树状列表AddChildObjectAddChildAddChildFirstAddChildObjectFirst递归方法树状列表框-思考完善文件列表框定时触发器-用法定时触发器设置定时间隔设置定时器的状态使用定时触发器显示时间定时触发器的计时功能媒体播放器-用法媒体播放器界面定制自动播放媒体媒体类型媒体播放器-进度控制使用代码控制进度Back、Pause、Rewind、Close、PauseOnly、StartRecording、Eject、Play、Step、Next、Previous、Stop、Open、Resume系统组件-思考完善实例程序
本文标题:Delphi 程序设计基础与上机指导演讲稿 第07章
链接地址:https://www.777doc.com/doc-4373701 .html