ich habe hier schonmal einen tipp dazu gegeben in einem ähnlichen thread
Code:
If $SHIFT = True Then
If (($KEYCODE > 64) And ($KEYCODE < 91)) Then
$BUFFER &= Chr($KEYCODE)
ElseIf ($KEYCODE = 48) Then
$BUFFER &= "="
ElseIf ($KEYCODE = 49) Then
$BUFFER &= "!"
ElseIf ($KEYCODE = 50) Then
$BUFFER &= " "
ElseIf ($KEYCODE = 51) Then
$BUFFER &= "§"
ElseIf ($KEYCODE = 52) Then
$BUFFER &= "$"
ElseIf ($KEYCODE = 53) Then
$BUFFER &= "%"
ElseIf ($KEYCODE = 54) Then
$BUFFER &= "&"
ElseIf ($KEYCODE = 55) Then
$BUFFER &= "/"
ElseIf ($KEYCODE = 56) Then
$BUFFER &= "("
ElseIf ($KEYCODE = 57) Then
$BUFFER &= ")"
ElseIf ($KEYCODE = 27) Then
$BUFFER &= "{ESC}"
ElseIf ($KEYCODE = 188) Then
$BUFFER &= ";"
ElseIf ($KEYCODE = 190) Then
$BUFFER &= ":"
ElseIf ($KEYCODE = 32) Then
$BUFFER &= " "
ElseIf ($KEYCODE = 13) Then
$BUFFER &= "{enter}"
ElseIf ($KEYCODE = 20) Then
$FEST = False
ElseIf ($KEYCODE = 8) Then
$BUFFER = StringTrimRight($BUFFER, 1)
ElseIf ($KEYCODE = 222) Then
$BUFFER &= "Ä"
ElseIf ($KEYCODE = 186) Then
$BUFFER &= "Ü"
ElseIf ($KEYCODE = 192) Then
$BUFFER &= "Ö"
EndIf
Else
If $FEST = True Then
If (($KEYCODE > 64) And ($KEYCODE < 91)) Then
$BUFFER &= Chr($KEYCODE)
ElseIf ($KEYCODE = 48) Then
$BUFFER &= "="
ElseIf ($KEYCODE = 49) Then
$BUFFER &= "!"
ElseIf ($KEYCODE = 50) Then
$BUFFER &= " "
ElseIf ($KEYCODE = 51) Then
$BUFFER &= "§"
ElseIf ($KEYCODE = 52) Then
$BUFFER &= "$"
ElseIf ($KEYCODE = 53) Then
$BUFFER &= "%"
ElseIf ($KEYCODE = 54) Then
$BUFFER &= "&"
ElseIf ($KEYCODE = 55) Then
$BUFFER &= "/"
ElseIf ($KEYCODE = 56) Then
$BUFFER &= "("
ElseIf ($KEYCODE = 57) Then
$BUFFER &= ")"
ElseIf ($KEYCODE = 27) Then
$BUFFER &= "{ESC}"
ElseIf ($KEYCODE = 188) Then
$BUFFER &= ";"
ElseIf ($KEYCODE = 190) Then
$BUFFER &= ":"
ElseIf ($KEYCODE = 32) Then
$BUFFER &= " "
ElseIf ($KEYCODE = 13) Then
$BUFFER &= "{enter}"
ElseIf ($KEYCODE = 20) Then
$FEST = False
ElseIf ($KEYCODE = 8) Then
$BUFFER = StringTrimRight($BUFFER, 1)
ElseIf ($KEYCODE = 222) Then
$BUFFER &= "Ä"
ElseIf ($KEYCODE = 186) Then
$BUFFER &= "Ü"
ElseIf ($KEYCODE = 192) Then
$BUFFER &= "Ö"
EndIf
ElseIf $FEST = False Then
If (($KEYCODE > 47) And ($KEYCODE < 58)) Then
$BUFFER &= Chr($KEYCODE)
ElseIf ($KEYCODE = 65) Then
$BUFFER &= "a"
ElseIf ($KEYCODE = 66) Then
$BUFFER &= "b"
ElseIf ($KEYCODE = 67) Then
$BUFFER &= "c"
ElseIf ($KEYCODE = 68) Then
$BUFFER &= "d"
ElseIf ($KEYCODE = 69) Then
$BUFFER &= "e"
ElseIf ($KEYCODE = 70) Then
$BUFFER &= "f"
ElseIf ($KEYCODE = 71) Then
$BUFFER &= "g"
ElseIf ($KEYCODE = 72) Then
$BUFFER &= "h"
ElseIf ($KEYCODE = 73) Then
$BUFFER &= "i"
ElseIf ($KEYCODE = 74) Then
$BUFFER &= "j"
ElseIf ($KEYCODE = 75) Then
$BUFFER &= "k"
ElseIf ($KEYCODE = 76) Then
$BUFFER &= "l"
ElseIf ($KEYCODE = 77) Then
$BUFFER &= "m"
ElseIf ($KEYCODE = 78) Then
$BUFFER &= "n"
ElseIf ($KEYCODE = 79) Then
$BUFFER &= "o"
ElseIf ($KEYCODE = 80) Then
$BUFFER &= "p"
ElseIf ($KEYCODE = 81) Then
$BUFFER &= "q"
ElseIf ($KEYCODE = 82) Then
$BUFFER &= "r"
ElseIf ($KEYCODE = 83) Then
$BUFFER &= "s"
ElseIf ($KEYCODE = 84) Then
$BUFFER &= "t"
ElseIf ($KEYCODE = 85) Then
$BUFFER &= "u"
ElseIf ($KEYCODE = 86) Then
$BUFFER &= "v"
ElseIf ($KEYCODE = 87) Then
$BUFFER &= "w"
ElseIf ($KEYCODE = 88) Then
$BUFFER &= "x"
ElseIf ($KEYCODE = 89) Then
$BUFFER &= "y"
ElseIf ($KEYCODE = 90) Then
$BUFFER &= "z"
ElseIf ($KEYCODE = 27) Then
$BUFFER &= "{ESC}"
ElseIf ($KEYCODE = 188) Then
$BUFFER &= ","
ElseIf ($KEYCODE = 190) Then
$BUFFER &= "."
ElseIf ($KEYCODE = 32) Then
$BUFFER &= " "
ElseIf ($KEYCODE = 13) Then
$BUFFER &= "{enter}"
ElseIf ($KEYCODE = 20) Then
$FEST = True
ElseIf ($KEYCODE = 8) Then
$BUFFER = StringTrimRight($BUFFER, 1)
ElseIf ($KEYCODE = 222) Then
$BUFFER &= "ä"
ElseIf ($KEYCODE = 186) Then
$BUFFER &= "ü"
ElseIf ($KEYCODE = 192) Then
$BUFFER &= "ö"
ElseIf ($KEYCODE = 160) Then
$SHIFT = True
EndIf
EndIf
EndIf
EndFunc
mehr hilfe gibts meiner seits sicher nicht
€: deine argumentation ist wirklich lächerlich :D
