设置菜单样式.
#Include <GuiMenu.au3>
_GUICtrlMenu_SetMenuStyle($hMenu, $iStyle)
$hMenu | 菜单句柄 |
$iStyle | 菜单样式. 它可以是下面的一个或者多个值组合: $MNS_AUTODISMISS - 当鼠标不在菜单上时,过10秒自动结束. $MNS_CHECKORBMP - The same space is reserved for the check mark and the bitmap $MNS_DRAGDROP - 菜单项目是一个 OLE 拖放目标或者拖放源(参考OLE容器). $MNS_MODELESS - 菜单是一个非模态的 $MNS_NOCHECK - No space is reserved to the left of an item for a check mark $MNS_NOTIFYBYPOS - 当菜单被选择,菜单所有者返回一个 $WM_MENUCOMMAND 消息代替 $WM_COMMAND 消息. |
成功: | True |
失败: | False |
#include <GuiMenu.au3>
_Main()
Func _Main()
Local $hWnd, $hMain, $hFile
; 打开记事本
Run("notepad.exe")
WinWaitActive("[CLASS:Notepad]")
$hWnd = WinGetHandle("[CLASS:Notepad]")
$hMain = _GUICtrlMenu_GetMenu($hWnd)
$hFile = _GUICtrlMenu_GetItemSubMenu($hMain, 0)
; Get/Set File menu style
Writeln("File menu style: 0x" & Hex(_GUICtrlMenu_GetMenuStyle($hFile)))
_GUICtrlMenu_SetMenuStyle($hFile, $MNS_NOCHECK)
Writeln("File menu style: 0x" & Hex(_GUICtrlMenu_GetMenuStyle($hFile)))
EndFunc ;==>_Main
; 写入一行文本到记事本
Func Writeln($sText)
ControlSend("[CLASS:Notepad]", "", "Edit1", $sText & @CR)
EndFunc ;==>Writeln