AutoIt上路01-用一个实例学习AutoIt:http://www.gaohaiyan.com/902.html
书接上文,按照设计需求,继续我们的开发。
在一个软件中,菜单栏是必不可少的部分,软件全部的功能都会在菜单中体现。本文就讲讲如何创建菜单并产生交互;我不是界面设计师,所以美观上就不提了。
现在看代码实现:
1)GUICtrlCreateMenu创建菜单
2)GUICtrlCreateMenuItem创建菜单的项目
3)GUICtrlSetOnEvent设置事件处理
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 |
#include <GUIConstantsEx.au3> Opt("GUIOnEventMode", 1) $guiWelcome = GUICreate("威格灵", 400, 200) GUISetOnEvent($GUI_EVENT_CLOSE, "Func_GUI_EVENT_CLOSE") ;------ 菜单栏控件,在窗体中创建 $menuFile = GUICtrlCreateMenu ( "文件 &F") ; 创建菜单项(项目名,父控件) $itemOpenInMenuFile = GUICtrlCreateMenuItem("打开", $menuFile) $itemSaveInMenuFile = GUICtrlCreateMenuItem("保存", $menuFile) ; 不指定菜单项文本,则创建为分割线 GUICtrlCreateMenuItem("", $menuFile) ; 分隔线 #cs 这里GUICtrlCreateMenu仍旧创建的是菜单,则其可以添加菜单项产生子菜单 #ce $itemRecentfilesInMenuFile = GUICtrlCreateMenu("最近的文件", $menuFile) $itemRecentfile1 = GUICtrlCreateMenuItem("文件1", $itemRecentfilesInMenuFile) $itemRecentfile2 = GUICtrlCreateMenuItem("文件2", $itemRecentfilesInMenuFile) $itemRecentfile3 = GUICtrlCreateMenuItem("文件3", $itemRecentfilesInMenuFile) GUICtrlCreateMenuItem("", $menuFile) ; 分隔线 $itemExitInMenuFile = GUICtrlCreateMenuItem("退出", $menuFile) ; 菜单项的点击事件处理(菜单项句柄,“自定义函数”) GUICtrlSetOnEvent($itemExitInMenuFile, "Func_GUI_EVENT_CLOSE") ; 退出应用 $menuEdit = GUICtrlCreateMenu ( "编辑 &E") ; 按Alt,再按E,即可打开菜单 $itemCopyInMenuEdit = GUICtrlCreateMenuItem("复制", $menuEdit) GUICtrlSetOnEvent($itemCopyInMenuEdit, "Func_Copy_In_MenuEdit") GUISetState(@SW_SHOW, $guiWelcome) While 1 Sleep(200) WEnd Func Func_GUI_EVENT_CLOSE () Exit EndFunc Func Func_Copy_In_MenuEdit () MsgBox(0, "提示", "你点击了菜单“编辑”下的“复制”项目") EndFunc |
查看帮助文档,找到 内置函数总目录\GUI管理\GUI控件创建\GUICtrlCreateMenu ,其中有菜单控件的详细说明及示例。
声明
本文由崔维友 威格灵 cuiweiyou vigiles cuiweiyou 原创,转载请注明出处:http://www.gaohaiyan.com/910.html
承接App定制、企业web站点、办公系统软件 设计开发,外包项目,毕设