How do I set a letter in a button to be underlined so that i can press the underlined letter to click it?

[RajASP]

Hi Guys,

I know this is probably there somewhere in the help manual, but I couldn't find it; So i wanted to know how I could set a letter in a button that is underlined, so that i can press that letter instead of having to click the button. We all do know how if we press and hold alt while right clicking in windows some letters are underlined and all you have to do is press the underlined letter right? So if anyone can give me a solution to this problem, I'll be extremely grateful.

[Andreik]

I think you talk about accelerators. Check references GUISetAccelerators().

EDIT:

Example modified to be first letter underlined:

#include <GUIConstantsEx.au3>

GUICreate("Custom Msgbox", 210, 80)

GUICtrlCreateLabel("Please click a button!", 10, 10)
$YesID = GUICtrlCreateButton("&Yes", 10, 50, 50, 20)
$NoID = GUICtrlCreateButton("&No", 80, 50, 50, 20)
$ExitID = GUICtrlCreateButton("Exit", 150, 50, 50, 20)

; Set accelerators for Ctrl+y and Ctrl+n
Dim $AccelKeys[2][2]=[["y", $YesID], ["n", $NoID]]
GUISetAccelerators($AccelKeys)

GUISetState()  ; display the GUI

Do
    $msg = GUIGetMsg()

    Select
        Case $msg = $YesID
            MsgBox(0, "You clicked on", "Yes")
        Case $msg = $NoID
            MsgBox(0, "You clicked on", "No")
        Case $msg = $ExitID
            MsgBox(0, "You clicked on", "Exit")
        Case $msg = $GUI_EVENT_CLOSE
            MsgBox(0, "You clicked on", "Close")
    EndSelect
Until $msg = $GUI_EVENT_CLOSE Or $msg = $ExitID

Edited July 16, 2011 by Andreik

[BrewManNH]

When you create a button, the if you put "&" before one of the letters for the text of the button, that will be the accelerator for the button. For example:

$button = GUICtrlCreateButton("&Test", 20, 20)

That will give you an underlined T in the word Test and that will be the key to activate the button.