Enter Hotkey for custom calculator

[Magikarp7]

Hi!

I was trying to make a program with an in-built calculator on a separate tab. The calculator works fine with the operators. But the problem is that when I press the "Enter" key it only functions on the form and when I focus on an internet browser, like GOOGLE, the enter key won't work anymore when I type something in google.

I know that the program is still running. But I set the hotkeys to not work when the GUIform is not active. How do I fix this? Any help will be appreciated! Gonna post some snippets of the code.

Func PressEqual()
 If WinActive($TrackerForm) Then
  MsgBox()
 EndIf
EndFunc 

[Magikarp7]

Hi!

I was trying to make a program with an in-built calculator on a separate tab. The calculator works fine with the operators. But the problem is that when I press the "Enter" key it only functions on the form and when I focus on an internet browser, like GOOGLE, the enter key won't work anymore when I type something in google.

I know that the program is still running. But I set the hotkeys to not work when the GUIform is not active. How do I fix this? Any help will be appreciated! Gonna post some snippets of the code.The calculator has 2 inputboxes. One inputbox is for the output and the other is a real time tracker of what the user types in.
 

expandcollapse popup

Func PressEqual()
             If WinActive($TrackerForm) Then
                      MsgBox(0,"","Enter working!")
             EndIf
EndFunc 



Switch GUICtrlRead($Tab1)
                        Case 3 ;this is the tab where my calculator is programmed.
                                     If WinActive($TrackerForm) Then
                                                  HotKeySet("{NUMPAD0}", "Press0")
                                                  HotKeySet("{0}", "Press0")
                                                  HotKeySet("{NUMPAD1}", "Press1")
                                                  HotKeySet("{1}", "Press1")
                                                   ;...
                                                   ;etc. etc. etc. for the other hotkeys.
                                                  HotKeySet("{+}", "PressAdd")
                                      EndIf
      
                         Case Else
                                        HotKeySet("{NUMPAD0}")
                                        HotKeySet("{0}")
                                        HotKeySet("{NUMPAD1}")
                                        ;...
                                       ;etc. etc. etc. for the other hotkeys..
                                       HotKeySet("{ENTER}")
EndSwitch


Func PressAdd()
             If WinActive($TrackerForm) Then
                         $getCalcresult = GUICtrlRead($calcresult) ;this inputbox displays the result
                         $getCalcreader = GUICtrlRead($calcreader) ;real time inputbox.

                                    If $getCalcresult = "" And $getCalcreader <> "" Then
                                              $FirstNum = GUICtrlRead($calcreader)
                                              GUICtrlSetData($calcresult, $FirstNum & " + ")
                                    EndIf
  
                                   If $getCalcresult <> "" And $getCalcreader <> "" Then
                                                If StringInStr($getCalcresult, "+") Then
                                                         $FirstNum = $getCalcresult + $getCalcreader
                                                         GUICtrlSetData($calcresult, $FirstNum & " + ")
                                               EndIf
                                   If StringInStr($getCalcresult, "-") Then
                                                        $FirstNum = $getCalcresult - $getCalcreader
                                                        GUICtrlSetData($calcresult, $FirstNum & " + ")
                                  EndIf
                                  If StringInStr($getCalcresult, "*") Then
                                                       $FirstNum = $getCalcresult * $getCalcreader
                                                       GUICtrlSetData($calcresult, $FirstNum & " + ")
                                  EndIf
                                 If StringInStr($getCalcresult, "/") Then
                                                       $FirstNum = $getCalcresult / $getCalcreader
                                                       GUICtrlSetData($calcresult, $FirstNum & " + ")
                                  EndIf
                       EndIf
  GUICtrlSetData($calcreader, "")
 EndIf
EndFunc

 

Edited November 11, 2017 by Jos
added codebox

[Jos]

Have you tried setting the button style $BS_DEFPUSHBUTTON ?

Jos

[Jos]

Why did you create a new topic in Examples while you have the question already posted in the other thread?
Merged and moved to support

Jos

Edited November 11, 2017 by Jos

[argumentum]

if you 

HotKeySet("{NUMPAD1}", "Press1")

then, to free it up, you'd need 

HotKeySet("{NUMPAD1}", "")

But I'd use GUISetAccelerators().