UDF > GUI > GuiMenu >


_GUICtrlMenu_GetMenuBarInfo

Obtient des informations sur la barre de menu sp�cifi�

#include <GuiMenu.au3>
_GUICtrlMenu_GetMenuBarInfo ( $hWnd [, $iItem = 0 [, $iObject = 1]] )

Param�tres

$hWnd Handle de la fen�tre dont les informations doivent �tre extraites
$iItem [optionnel] Sp�cifie l'�l�ment pour lequel vous souhaitez obtenir des informations. Si 0, la fonction Obtient des informations sur le menu lui-m�me.
Si 1, la fonction obtient des informations sur le premier �l�ment du menu, et ainsi de suite.
$iObject [optionnel] Sp�cifie l'objet du menu:
    0 - Le menu d�roulant associ� � la fen�tre
    1 - La barre de menu associ� � la fen�tre
    2 - Le menu syst�me associ� � la fen�tre

Valeur de retour

Succ�s: Retourne un tableau avec le format suivant:
    [0] - Coordonn�e X du coin sup�rieur gauche du rectangle
    [1] - Coordonn�e Y du coin sup�rieur gauche du rectangle,
    [2] - Coordonn�e X du coin inf�rieur droit du rectangle
    [3] - Coordonn�e Y du coin inf�rieur droit du rectangle
    [4] - Handle de la barre de menu ou du menu d�roulant
    [5] - Handle du sous-menu
    [6] - True si la barre de menu a le focus, sinon False
    [7] - True si l'�l�ment de menu a le focus, sinon False
�chec: D�finit @error <> 0.

Voir aussi

Consultez GetMenuBarInfo dans la librairie MSDN.

Exemple

#include <GuiMenu.au3>

Example()

Func Example()
    Local $hWnd, $aInfo

    ; Ouvre le Bloc-Notes
    Run("notepad.exe")
    WinWaitActive("[CLASS:Notepad]")
    $hWnd = WinGetHandle("[CLASS:Notepad]")

    ; Obtient des infos sur la barre de menu
    $aInfo = _GUICtrlMenu_GetMenuBarInfo($hWnd)
    Writeln("Left ............: " & $aInfo[0])
    Writeln("Top .............: " & $aInfo[1])
    Writeln("Right ...........: " & $aInfo[2])
    Writeln("Bottom ..........: " & $aInfo[3])
    Writeln("Menu handle .....: 0x" & Hex($aInfo[4]))
    Writeln("Submenu Handle ..: 0x" & Hex($aInfo[5]))
    Writeln("Menu bar focused : " & $aInfo[6])
    Writeln("Menu �l�ment focused: " & $aInfo[7])
EndFunc   ;==>Example

; �crire une ligne de texte dans le Bloc-Notes
Func Writeln($sText)
    ControlSend("[CLASS:Notepad]", "", "Edit1", $sText & @CRLF)
EndFunc   ;==>Writeln