Tastatur problem

  • Hallo ich habe ein problem ich hab ein script, bei dem befehle wir z.B. ein einfachen "w" an ein Fenster gesendet werden, wenn er aber /Befehl senden soll dann macht er immer 7Befehl oder &Befehl(das weil er aufeinmal die Tastatur auf Englsch umstellt) leider habe ich keine ahnung woran das liegt. Weiß es vllt. einer von euch?

  • zum größen teil besteht es hieraus. Der rest ist nur Gui

    Spoiler anzeigen
    [autoit]


    Func befehl1()
    ControlSend( $Win, "", "", "{Enter}")
    ControlSend( $Win, "", "", "/use7")
    ControlSend( $Win, "", "", "{Enter}")
    EndFunc

    Func befehl2()
    ControlSend( $Win, "", "", "{Enter}")
    ControlSend( $Win, "", "", "/use5")
    ControlSend( $Win, "", "", "{Enter}")
    EndFunc

    Func befehl3()
    ControlSend( $Win, "", "", "{Enter}")
    ControlSend( $Win, "", "", "/use1")
    ControlSend( $Win, "", "", "{Enter}")
    EndFunc
    Func befehl4()
    ControlSend( $Win, "", "", "{Enter}")
    ControlSend( $Win, "", "", "/script AcceptGroup()")
    ControlSend( $Win, "", "", "{Enter}")
    EndFunc

    While 1
    $Msg = GUIGetMsg()
    Switch $Msg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    $auswahl = GUICtrlRead($Combo)
    If $auswahl = "Fenster 1" Then
    $Win = "Window1"
    ElseIf $auswahl = "Fenster 2" Then
    $Win = "Window2"
    EndIf
    Select
    Case _IsPressed("12") And _IsPressed("31")
    ControlSend( $Win, "", "", "1")
    Case _IsPressed("12") And _IsPressed("32")
    ControlSend( $Win, "", "", "2")
    Case _IsPressed("12") And _IsPressed("33")
    ControlSend( $Win, "", "", "3")
    Case _IsPressed("12") And _IsPressed("34")
    ControlSend( $Win, "", "", "4")
    Case _IsPressed("12") And _IsPressed("35")
    ControlSend( $Win, "", "", "5")
    Case _IsPressed("12") And _IsPressed("36")
    ControlSend( $Win, "", "", "6")
    Case _IsPressed("12") And _IsPressed("37")
    ControlSend( $Win, "", "", "7")
    Case _IsPressed("12") And _IsPressed("38")
    ControlSend( $Win, "", "", "8")
    Case _IsPressed("12") And _IsPressed("39")
    ControlSend( $Win, "", "", "9")
    Case _IsPressed("12") And _IsPressed("30")
    ControlSend( $Win, "", "", "0")
    Case _IsPressed("12") And _IsPressed("57")
    ControlSend( $Win, "", "", "{w down}")
    Case _IsPressed("12") And _IsPressed("41")
    ControlSend( $Win, "", "", "aa")
    Case _IsPressed("12") And _IsPressed("53")
    ControlSend( $Win, "", "", "ss")
    Case _IsPressed("12") And _IsPressed("44")
    ControlSend( $Win, "", "", "dd")
    Case _IsPressed("12") And _IsPressed("46")
    ControlSend( $Win, "", "", "f")
    Case _IsPressed("12") And _IsPressed("70")
    ControlSend( $Win, "", "", "{F1}")
    Case _IsPressed("12") And _IsPressed("71")
    ControlSend( $Win, "", "", "{F2}")
    Case _IsPressed("12") And _IsPressed("20")
    ControlSend( $Win, "", "", "{Space}")
    Case _IsPressed("12") And _IsPressed("09")
    ControlSend( $Win, "", "", "{TAB}")
    Case _IsPressed("12") And _IsPressed("49")
    befehl1()
    Case _IsPressed("12") And _IsPressed("4F")
    befehl2()
    Case _IsPressed("12") And _IsPressed("54")
    befehl3()
    Case _IsPressed("12") And _IsPressed("4C")
    befehl4()
    Case _IsPressed("12") And _IsPressed("1B")
    WinClose( $Win)
    EndSelect
    Wend

    [/autoit]