右键菜单的编程方案.doc

  1. 1、本文档共12页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
右键菜单的编程方案

Design-ERP-右键菜单的编程方案 Page  PAGE 12 of  NUMPAGES 12 右键菜单的编程方案 注:右键菜单的编程方案分以下两种:(2011.11.23) A:GridView的dDIP();popRM()机制 B:TreeView的Tree+RMT机制 添加菜单条屏蔽功能之后 右图是onmouseover的效果 ASP页面中模拟MsWindow实现菜单条的屏蔽功能一直是一个心愿,一年多来,终究没能实现,最近静下心来,搞定了整个右键菜单的编程方案。 在RMD.js文件中,首先是画好一个菜单框架,并使其隐藏于页面,在原基础上,增加了三个id机制,实现了菜单条的屏蔽功能,更为方便的是可以在页面中直接利用$RMD变量去定义右键菜单及其表现细节。屏弃了原先的全凭$FuncNameForRMD变量而在RMD.js文件中利用switch和case去筛选设置各个页面的菜单的方式,这种方式无疑让我感到恐惧,因为RMD.js文件会因此而膨胀。 在ASP页面文件中可以如下定义: script type=text/javascript var $RMD=add,添加|kill,删除|edit,编辑hr|ext,扩展信息; var $FuncNameForRMD=MhiAdmin; System.Linkcss(RMD);//链接css文件 System.Loadjs (RMD); /script 而此时的$FuncNameForRMD仅是延用以前的RMD.js中的switch和case的机制的变量命名,其实,这个变量的命名应该换成$PageNameOfRMD。在RMD.js文件中,再一次地加载了各RMD的动作定义文件,而定义RMD动作的文件中也可以定义任何页面动作的js代码,所以这个被RMD.js文件再一次地加载的文件的存在是合理的,只要将$PageNameOfRMD变量手工地在页面中定义成页面文件的名称即可,例如:MhiView.asp页面文件中可以定义$PageNameOfRMD=”MhiView”, script type=text/javascript var $RMD=add,添加|kill,删除|edit,编辑hr|ext,扩展信息; var $PageNameOfRMD=MhiView; System.Linkcss(RMD);//链接css文件 System.Loadjs (RMD); /script 于是,在RMD.js文件中即可以采用如下语句加载动作文件: System.Loadjs(“/RMD/”+$PageNameOfRMD); 注:动作文件被集中到js的RMD目录下。 ■屏蔽菜单条的测试过程 在页面文件中简单地放置一个按钮,以期出现不同的菜单效果: !--调试菜单条的动态屏蔽功能-- input type=button name=”test” value=”屏蔽菜单测试” onclick=$(ItemDivOfRMD1).className=DisableRMDItem; $(ItemTDofRMD1).onclick=function(){return false;}; $(ItemTDofRMD1).onmouseover=function(){return false;}; $(ItemTextOfRMD1).className=RMDItemColor / 右图是按下测试按钮后的效果 可以看出,上述按钮语句中的三个id就是实现菜单屏蔽功能的关键,而所需屏蔽的菜单条的次序就是$RMD字符串中的菜单次序,三个id的功能分别如下: 显示屏蔽色 阻止菜单条动作 使菜单条整条显示屏蔽色 ItemTextOfRMD1 ItemTDOfRMD1 ItemDivOfRMD1 注意上述三个Id中的最后一位数字,它表示菜单条的次序。 由测试按钮的代码可以实现通用ASP函数DisableItemOfRMD(Indexs),代码如下: % 菜单条的屏蔽 Function DisableItemOfRMD(Indexs) Dim Idx Idx =Split(Indexs,,) Dim Js,Js1,Js2 Dim i Js = Js1 =script type=text/javascript For i=0 To Ubound(Idx) Js =Js+$(ItemDivOfRMDIdx(i)).className=DisableRMDItem; Js =Js+$(ItemTextOfRMDIdx(i)).className=RMDItemColor; Js =Js+$(It

文档评论(0)

2017ll + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档