下次自动登录
现在的位置:
& 综合 & 正文
Delphi中菜单与工具栏按钮的状态控制
在好多的桌面应用中，会使用到菜单和工具栏按钮，不同的用户登录到应用系统中会依据其权限显示相应的菜单与工具栏按钮，在显示出来的菜单与按钮中又会根据程序的状态来设置其有效性。举个简单的例子，通常保存按钮是在编辑内容发生变化后才可以使用，数据集的保存需要在编辑状态下才可以使用。
刚开始编写程序时，中到处都是这些状态控制代码，如在数据集的“编辑”按钮、菜单的单击事件中启用“保存”和“取消”按钮、菜单，同时要禁止“编辑”按钮、菜单，以防止用户在编辑状态下再次点击编辑按钮、菜单；同时还要在“保存”和“取消”按钮、菜单的单击事件中作相反的设置，禁用“保存”和“取消”按钮、菜单。
其实完全没有必要如此麻烦，首先我们将菜单的单击事件和工具栏按钮单击事件指向同一个事件过程上，这样代码量就可以减少一倍。如果还为客户提供其他调用方式，如上下文菜单，同样也可以将其单击事件指向这个事件过程。让多个用户调用接口都指向一处是一个很明智的做法，不仅降低了代码编写量，同时也规范了执行动作。
我们只要善加使用Delphi提供的VCL控件，就会发现有一个很好用的ActionList控件。它是若干Action的群集，每个Action对象都使用了命令模式封装了一个操作。可以让若干个菜单项或是工具栏按钮等用户控件与相应的Action对象绑定，这样当用户点击这个菜单或是按钮是就触发了Action对象的执行事件（OnExecute），很轻松地实现了上文所说的“多个用户调用接口指向同一处理过程”的设计。Action对象还有一个很不错的OnUpdate事件，我们可以利用这个事件来控件Action对象的状态与可视性（当我们设置Action对象的Enabled和Visible属性时与其关系的相关控件的对应属性也会被设置），这样就不用在多处编写状态控制代码了，实现集中管理。
假设我们有一组与数据集相关的Action对象（Delphi其实已经将这些做为标准Action提供给我们了，此处仅是为了说明如何使用）对应着数据集的导航、编辑、保存、取消、删除和新增操作。我们只需要在菜单中增加一些菜单项，并与这些Action对象绑定，如果需要也可以在工具栏上增加一些按钮并Action对象绑定，这样我们就提供了两处调用接口：菜单项与工具栏按钮。但我们的代码仅有一处，就是Action的OnExecute事件。我们需要根据数据集的状态动设的设置这些功能的能用与否，只要在ActionList控件的OnUpdate事件中编写状态控制代码即可控件与这些Action对象相绑定的菜单项与按钮的状态。
procedure TForm1ActionList1Update(Action: TBasicA
var Handled: Boolean);begin
actFirst.Enabled := not DataSet.B
actPrior.Enabled := not DataSet.B
actNext.Enabled := not DataSet.E
actLast.Enabled := not DataSet.E
actInsert.Enabled := DataSet.State in [dsBrowse];
actPost.Enabled := DataSet in dsEditM
actCancel.Enabled := DataSet in dsEditM
actDelete.Enabled := (DataSet.State in [dsBrowse]) and (DataSet.RecordCount & <span style="COLOR: #);
&&&&推荐文章:
【上篇】【下篇】word试题及答案_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
word试题及答案
上传于||暂无简介
阅读已结束，如果下载本文需要使用
想免费下载本文？
下载文档到电脑，查找使用更方便
还剩8页未读，继续阅读
你可能喜欢&&&&最新版百度工具栏提高网站百度权重指数最好软件
最新版百度工具栏提高网站百度权重指数最好软件
最新版百度工具栏提高网站百度权重指数最好软件 让你的网站排名靠前
若举报审核通过，可奖励20下载分
被举报人：
举报的资源分：
请选择类型
资源无法下载
资源无法使用
标题与实际内容不符
含有危害国家安全内容
含有反动色情等内容
含广告内容
版权问题，侵犯个人或公司的版权
*详细原因：
您可能还需要
行业下载排行maya题库给学生_图文_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
maya题库给学生
上传于||文档简介
&&M&#8203;a&#8203;Y&#8203;a&#8203;随&#8203;堂&#8203;考&#8203;试&#8203;练&#8203;习
阅读已结束，如果下载本文需要使用
想免费下载本文？
下载文档到电脑，查找使用更方便
还剩64页未读，继续阅读
你可能喜欢2011MAYA复习题带答案_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
2011MAYA复习题带答案
上传于||暂无简介
阅读已结束，如果下载本文需要使用
想免费下载本文？
下载文档到电脑，查找使用更方便
还剩16页未读，继续阅读
你可能喜欢}