Jump to content

Detect focus


 Share

Recommended Posts

Can I detect a change of focus between edit boxes? I'm trying to set the default button depending on which edit box has focus. This doesn't work:

IF BitAnd( GUICtrlGetState($ePass), $GUI_FOCUS ) Then
            GUICtrlSetState($bLaunch, $GUI_DEFBUTTON)
        ElseIf BitAnd( GUICtrlGetState($ePass_2), $GUI_FOCUS ) Then
            GUICtrlSetState($bLaunch_2, $GUI_DEFBUTTON)
        EndIf

When I diagnose this, GUICtrlGetState is returning 80, but $GUI_FOCUS is 256, so this is clearly wrong. I don't think GUICtrlGetState is going to tell me if the control has focus.

Link to comment
Share on other sites

  • Moderators

PhilHibbs,

I would do it this way: :(

#include <GUIConstantsEx.au3>
#include <WinAPI.au3>

$hGUI = GUICreate("Test", 500, 500)

$hEdit_1 = GUICtrlCreateEdit("", 10, 10, 400, 140)
$hEdit_1_Handle = GUICtrlGetHandle(-1)
$hButton_1 = GUICtrlCreateButton("Edit 1", 10, 160, 80, 30)

$hEdit_2 = GUICtrlCreateEdit("", 10, 210, 400, 140)
$hEdit_2_Handle = GUICtrlGetHandle(-1)
$hButton_2 = GUICtrlCreateButton("Edit 1", 10, 360, 80, 30)

GUISetState()

_WinAPI_SetFocus($hEdit_1_Handle)
GUICtrlSetState($hButton_2, $GUI_DISABLE)

While 1

    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch

    Switch _WinAPI_GetFocus()
        Case $hEdit_1_Handle
            If BitAnd(GUICtrlGetState($hButton_1), $GUI_DISABLE) = $GUI_DISABLE Then GUICtrlSetState($hButton_1, $GUI_ENABLE)
            If BitAnd(GUICtrlGetState($hButton_2), $GUI_ENABLE) = $GUI_ENABLE Then GUICtrlSetState($hButton_2, $GUI_DISABLE)
        Case $hEdit_2_Handle
            If BitAnd(GUICtrlGetState($hButton_2), $GUI_DISABLE) = $GUI_DISABLE Then GUICtrlSetState($hButton_2, $GUI_ENABLE)
            If BitAnd(GUICtrlGetState($hButton_1), $GUI_ENABLE) = $GUI_ENABLE Then GUICtrlSetState($hButton_1, $GUI_DISABLE)
    EndSwitch

WEnd

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

Or like this:

$Main = GUICreate("Example",400,250)
$Edit1 = GUICtrlCreateEdit("",5,5,190,190)
$Edit2 = GUICtrlCreateEdit("",205,5,190,190)
$Button1 = GUICtrlCreateButton("Launch",50,210,100,30)
$Button2 = GUICtrlCreateButton("Launch",250,210,100,30)
GUISetState(@SW_SHOW,$Main)

While True
    If GUIGetMsg() = -3 Then Exit
    If ControlGetFocus("Example") = "Edit1" Then
        GUICtrlSetState($Button1,512)
    ElseIf ControlGetFocus("Example") = "Edit2" Then
        GUICtrlSetState($Button2,512)
    EndIf
    Sleep(10)
WEnd

When the words fail... music speaks.

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...