HotKeySet() hilfe

ophiel

Hallo Com,

Ich habe ein Problem mit dem Befehl: HotKeySet( "key", "function")

Ich möchte ein Buchstaben zähl programm machen

D.h. ich mache einen skript der so aussieht:

[autoit]

HotKeySet("{a}", "a")

[/autoit][autoit][/autoit][autoit]

Func a()
$a = $a+1
EndFunc

[/autoit]

Soweit sogut

nun habe ich das Problem wenn ich Word öffne und das Programm laufen haben blockiert HotKeySet irgendwie die Buchstaben
also ich kann nichts schreiben in word aber es wird trozdem gezählt.

weis jemand wie man diese sperre oder was das ist umgehen kann?
also das der text normal getippt wird?

**Schnitzel**

[autoit]

HotKeySet("{a}", "a")

[/autoit][autoit][/autoit][autoit]

Func a()
HotKeySet("{a}")
$a = $a+1
send("a")
HotKeySet("{a}", "a")
EndFunc

[/autoit]

BadBunny

Versuchs mal mit _IsPressed

Spoiler anzeigen

[autoit][/autoit] [autoit][/autoit] [autoit]

#Include <Misc.au3>

[/autoit] [autoit][/autoit] [autoit]

HotKeySet("{F1}","anzeigen_beenden")
Global $aBuchstaben[36] = [30, 31, 32,33,34,35,36,37,38,39,41,42,43,44,45,46,47,48,49,"4A","4B","4C","4D","4E","4F",50,51,52,53,54,55,56,57,58,59,"5A"]
$anzahlderbuchstaben = 0
While Sleep (50)
ToolTip ($anzahlderbuchstaben,0,0)
For $i = 0 to UBound($aBuchstaben) -1
If _IsPressed($aBuchstaben[$i]) Then
$anzahlderbuchstaben+= 1
EndIf
If _IsPressed (08) Then
Sleep (200)
$anzahlderbuchstaben = $anzahlderbuchstaben - 1
EndIf
Next
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func anzeigen_beenden()
MsgBox (0,"",$anzahlderbuchstaben)
Exit
EndFunc

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit]