Bei Hotkey ENTER, ENTER senden

andynbg9000

Hallo liebe AutoIT Gemeinde,

ich möchte auf GUI Ebene alle ENTER Eingaben abfangen, da sie mich stören. D.h. ENTER bei einer aktiven Gui deaktivieren. Ist die Gui nicht mehr aktiv soll ENTER wieder möglich sein.

Mein Ansatz war nun:

AutoIt

#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
HotKeySet("{ENTER}", "HotKeyPressed")




GUICreate("Form1")
GUISetState(@SW_SHOW)
 While 1
	 Switch GUIGetMsg()
		 Case $GUI_EVENT_CLOSE
			 ExitLoop
	 EndSwitch
  WEnd




Func HotKeyPressed()
	Switch @HotKeyPressed ; The last hotkey pressed.
        Case "{ENTER}"
			if WinActive("Form1") Then
			   ;MsgBox(1, "", "Enter ist deaktiviert")
			Else
			   Send("{ENTER}")
			Endif
    EndSwitch
EndFunc   ;==>HotKeyPressed

Alles anzeigen

Jedoch sendet er kein ENTER außerhalb der Gui. Bei dem Code funktioniert es ebenfalls nicht:

Bash

HotKeySet("{ENTER}", "HotKeyPressed")


Func HotKeyPressed()
Send("{ENTER}")
 EndFunc   ;==>HotKeyPressed




While 1


WEnd

Alles anzeigen

Was muss ich abändern, damit der Code funktioniert?

Vielen Dank im voraus

Edit: Bin gerade selbst draufgekommen, dass der Code in einen Loop läuft... Bin nun dabei die Lösung zu suchen....

andynbg9000

Die Lösung Ist:

AutoIt

Func HotKeyPressed()
    Switch @HotKeyPressed ; The last hotkey pressed.
        Case "{ENTER}" 
			if WinActive("Form1") Then
			Else
			   HotKeySet("{ENTER}")
			   Send("{ENTER}")
			   HotKeySet("{ENTER}", "HotKeyPressed")
			Endif
    EndSwitch
EndFunc   ;==>HotKeyPressed

Alles anzeigen

Und damit ist dieser Beitrag geschlossen

**autoiter**

Hallo @andynbg9000

Wenn es nur um die eigene GUI geht, würde ich gar nicht mit HotKeySet arbeiten. Ich denke GUISetAccelerators wäre hier besser geeignet.
Das sind von vornherein GUI spezifische Hotkeys, die allerdings nicht auf eine Funktion zielen, sondern eine GUI Message auslösen. Du kannst damit bspw. Enter mit einem Button auf deiner GUI verknüpfen, damit man ihn direkt mit der Tastatur ansteuern kann, wenn deine GUI aktiv ist.
Hier habe ich einfach die Enter-Taste mit "" verknüpft. Daher passiert auch nichts.

Spoiler anzeigen

AutoIt

Local $hGUI = GUICreate("", 300, 200)


Local $aAccelKeys[1][2] = [["{Enter}", ""]] ; <--- diese zwei Zeilen.
GUISetAccelerators($aAccelKeys) ; <--- diese zwei Zeilen.


GUISetState(@SW_SHOW, $hGUI)


While 1
	Switch GUIGetMsg()
		Case -3
			ExitLoop


	EndSwitch
WEnd

Alles anzeigen