设置弹出菜单
由于输入路径跟窗口名字并不是太常用,而且快捷键设置多了自己的键位又不够用,所以我们来设置一个弹出菜单。function ToolsForEditing.Menu() szOption = "请输入窗口路径",fnAction =function() ToolsForEditing.Enterdir() end, szOption = "请输入窗口名字",fnAction =function() ToolsForEditing.Enterwindowname() end,
szOption=菜单的名字,如果再菜单名字后面再加个{}就表明是二级菜单,以此类推,注意加逗号。 fnAction=按下后做什么功能,function()表示执行函数,记得加end
我们并没有一个专门存储菜单的地方,为了简便我们可以利用系统菜单作为存储位置。
ToolsForEditing._InsertPlayerMenu = InsertPlayerMenu; --建立一个变量,将这个变量等于系统调用函数的名字,用于保存系统函数 function ToolsForEditing.InsertPlayerMenu(_menu) --建立一个函数 ToolsForEditing._InsertPlayerMenu(_menu) --执行系统的函数 local _MyMenu = ToolsForEditing.Menu() --将自己的目录赋值 table.insert(_menu,_MyMenu) --加入自己的目录 InsertPlayerMenu = ToolsForEditing.InsertPlayerMenu --让系统函数等于我们的函数
这么一来系统在调用InsertPlayerMenu的时候就会执行ToolsForEditing.InsertPlayerMenu这个函数,在执行这个函数的时候会先执行原来的系统函数,然后再执行我们的函数。 效果见图:
|