Ersetzen von Zeichen in einer InputBox

  • Hallo zusammen,

    ich habe von einem Kollegen ein Script übernommen was nicht mehr so recht funktioniert. Nach dem Start des Scripts öffnet sich eine InputBox. In diese wird eine IP Adresse eingeben, nach Betätigung der Entertaste startet ein weiteres Programm und stellt mit dem Client eine Verbindung her. Soweit so gut. Ich und einige andere wollen aber die gesamte "Zahlenkolone über den Nummernblock eingeben und hier mein Problem: "Das Komma auf dem Nummernblock soll ein Punkt werden". Mit dem Script "KeyboardLayout.au3" funktioniert es nicht. Laufen soll das ganze unter Win7, falls es von Interesse ist. ?(

  • Entweder nachher ersetzen:

    [autoit]

    Local $IP_1 = "127,0,0,1"
    Local $IP_2 = StringReplace($IP_1, ",", ".")
    ConsoleWrite($IP_2 & @CRLF)

    [/autoit]

    oder vorübergehend einen HotKey setzen.

    [autoit]

    HotKeySet("{NUMPADDOT}", "_SendPunkt")
    HotKeySet("{ESC}", "_Exit")

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

    While 1
    Sleep(20000)
    WEnd

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

    Func _SendPunkt()
    Send(".")
    EndFunc

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

    Func _Exit()
    Exit
    EndFunc

    [/autoit]