GUI > Wert aus Input in Variable Speichern, Übertragen, danach Input löschen

  • Hallo :)

    Ich habe ein wohl doch eher kleines Problem.
    Mein Ziel ist es 6 Werte aus 6 Input-Feldern auszulesen, die Werte in 6 andere Inputs zu schreiben, und die Werte in ihren "alten" Inputs dann einfach zu löschen.....

    [autoit]


    Case $Button6

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

    $Zahl1 = GUICtrlRead($Input13) ;lese Werte aus Inpus aus
    $Zahl2 = GUICtrlRead($Input14)
    $Zahl3 = GUICtrlRead($Input15)
    $Zahl4 = GUICtrlRead($Input16)
    $Zahl5 = GUICtrlRead($Input17)
    $Zahl6 = GUICtrlRead($Input18)

    GUICtrlSetData($Input1, $Zahl1) ;Schreibe Werte in neue Inputs
    GUICtrlSetData($Input2, $Zahl2)
    GUICtrlSetData($Input3, $Zahl3)
    GUICtrlSetData($Input4, $Zahl4)
    GUICtrlSetData($Input5, $Zahl5)
    GUICtrlSetData($Input6, $Zahl6)

    GUICtrlSetData($Input13, '') ; Lösche Ausgangs-Input-Felder
    GUICtrlSetData($Input14, '')
    GUICtrlSetData($Input15, '')
    GUICtrlSetData($Input16, '')

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

    GUICtrlSetData($Input17, '')
    GUICtrlSetData($Input18, '')

    send( "{ENTER}" )

    [/autoit]

    Das ganze funktioniert nur nicht....er löscht mir alles raus....nicht nur die Inputs, die ich angegeben habe....

    Kann mir einer einen Tip geben?

    LG
    Vaysh

    Einmal editiert, zuletzt von Rahl (14. Juni 2013 um 13:03)

  • Danke schonmal fürs schnelle reinschauen :)
    Ich steh mal wieder auf dem Schlauch...Werte von Input nach Input funktionierte nach Test, nur das löschen nicht.

    Hier das komplette Programm:
    Button 6 soll gedrückt werden...also Button "Mix auf Pferd A"

    Spoiler anzeigen
    [autoit]


    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    #Region ### START Koda GUI section ### Form=

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

    $Form1_1 = GUICreate("Mix-Rechner", 615, 383, 200, 115)
    $Label1 = GUICtrlCreateLabel("Ausdauer", 8, 72, 45, 17)
    $Input1 = GUICtrlCreateInput("", 72, 72, 121, 21)
    $Label2 = GUICtrlCreateLabel("Tempo", 8, 97, 40, 17)
    $Input2 = GUICtrlCreateInput("", 72, 96, 121, 21)
    $Label3 = GUICtrlCreateLabel("Dressur", 8, 122, 40, 17)
    $Input3 = GUICtrlCreateInput("", 72, 120, 121, 21)
    $Input4 = GUICtrlCreateInput("", 264, 72, 121, 21)
    $Label4 = GUICtrlCreateLabel("Galopp", 210, 72, 38, 17)
    $Label5 = GUICtrlCreateLabel("Trab", 210, 97, 26, 17)
    $Input5 = GUICtrlCreateInput("", 264, 96, 121, 21)
    $Label6 = GUICtrlCreateLabel("Springen", 210, 122, 46, 17)
    $Input6 = GUICtrlCreateInput("", 264, 120, 121, 21)
    $Label7 = GUICtrlCreateLabel("Ausdauer", 8, 238, 49, 17)
    $Input7 = GUICtrlCreateInput("", 74, 235, 121, 21)
    $Label8 = GUICtrlCreateLabel("Tempo", 8, 263, 37, 17)
    $Input8 = GUICtrlCreateInput("", 74, 259, 121, 21)
    $Label9 = GUICtrlCreateLabel("Dressur", 8, 288, 40, 17)
    $Input9 = GUICtrlCreateInput("", 74, 283, 121, 21)
    $Input10 = GUICtrlCreateInput("", 266, 235, 121, 21)
    $Label10 = GUICtrlCreateLabel("Galopp", 210, 238, 38, 17)
    $Label11 = GUICtrlCreateLabel("Trab", 210, 263, 26, 17)
    $Input11 = GUICtrlCreateInput("", 266, 259, 121, 21)
    $Label12 = GUICtrlCreateLabel("Springen", 210, 288, 46, 17)
    $Input12 = GUICtrlCreateInput("", 266, 283, 121, 21)
    $Input13 = GUICtrlCreateInput("", 482, 75, 121, 21)
    $Label16 = GUICtrlCreateLabel("Galopp", 418, 163, 38, 17)
    $Label13 = GUICtrlCreateLabel("Ausdauer", 418, 75, 49, 17)
    $Label14 = GUICtrlCreateLabel("Tempo", 418, 99, 37, 17)
    $Input14 = GUICtrlCreateInput("", 482, 99, 121, 21)
    $Label15 = GUICtrlCreateLabel("Dressur", 418, 124, 40, 17)
    $Input15 = GUICtrlCreateInput("", 482, 123, 121, 21)
    $Input16 = GUICtrlCreateInput("", 482, 163, 121, 21)
    $Label17 = GUICtrlCreateLabel("Trab", 418, 187, 26, 17)
    $Input17 = GUICtrlCreateInput("", 482, 187, 121, 21)
    $Label18 = GUICtrlCreateLabel("Springen", 418, 212, 46, 17)
    $Input18 = GUICtrlCreateInput("", 482, 211, 121, 21)

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

    $Label36 = GUICtrlCreateLabel("Pferd A", 8, 16, 46, 17)
    GUICtrlSetFont(-1, 8, 800, 4, "MS Sans Serif")
    $Label37 = GUICtrlCreateLabel("Pferd B", 8, 184, 46, 17)
    GUICtrlSetFont(-1, 8, 800, 4, "MS Sans Serif")
    $Label38 = GUICtrlCreateLabel("Dein Mix", 418, 46, 53, 17)
    GUICtrlSetFont(-1, 8, 800, 4, "MS Sans Serif")

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

    $Label19 = GUICtrlCreateLabel("Genetisches Potenzial:", 8, 40, 112, 17)
    $Input45 = GUICtrlCreateInput("", 128, 40, 121, 21)
    $Label20 = GUICtrlCreateLabel("Genetisches Potenuial:", 8, 208, 113, 17)
    $Input46 = GUICtrlCreateInput("", 128, 200, 121, 21)

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

    $Button1 = GUICtrlCreateButton("Berechne Mix-Werte!", 418, 248, 185, 65, 0)
    $Button2 = GUICtrlCreateButton("Alles löschen!", 8, 320, 97, 33, 0)
    $Button3 = GUICtrlCreateButton("Pferd A löschen!", 108, 320, 97, 33, 0)
    $Button4 = GUICtrlCreateButton("Pferd B löschen", 208, 320, 97, 33, 0)
    $Button5 = GUICtrlCreateButton("Mix-Werte löschen", 308, 320, 97, 33, 0)
    $Button6 = GUICtrlCreateButton("Mix auf Pferd A", 408, 320, 97, 33, 0)
    $Button7 = GUICtrlCreateButton("Mix auf Pferd B", 508, 320, 97, 33, 0)

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

    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    Case $Button1

    $Ausdauer1 = GUICtrlRead($Input1)
    $Ausdauer2 = GUICtrlRead($Input7)

    $Tempo1 = GUICtrlRead($Input2)
    $Tempo2 = GUICtrlRead($Input8)

    $Dressur1 = GUICtrlRead($Input3)
    $Dressur2 = GUICtrlRead($Input9)

    $Gallopp1 = GUICtrlRead($Input4)
    $Gallopp2 = GUICtrlRead($Input10)

    $Trab1 = GUICtrlRead($Input5)
    $Trab2 = GUICtrlRead($Input11)

    $Springen1 = GUICtrlRead($Input6)
    $Springen2 = GUICtrlRead($Input12)

    $Ausdauer3 = ($Ausdauer1 + $Ausdauer2)/2
    $Tempo3 = ($Tempo1 + $Tempo2)/2
    $Dressur3 = ($Dressur1 + $Dressur2)/2
    $Gallopp3 = ($Gallopp1 + $Gallopp2)/2
    $Trab3 = ($Trab1 + $Trab2)/2
    $Springen3 = ($Springen1 + $Springen2)/2

    GUICtrlSetData($Input13, $Ausdauer3)
    GUICtrlSetData($Input14, $Tempo3)
    GUICtrlSetData($Input15, $Dressur3)
    GUICtrlSetData($Input16, $Gallopp3)
    GUICtrlSetData($Input17, $Trab3)
    GUICtrlSetData($Input18, $Springen3)

    send( "{ENTER}" )

    Case $Button2

    GUICtrlSetData($Input1, '')
    GUICtrlSetData($Input2, '')
    GUICtrlSetData($Input3, '')
    GUICtrlSetData($Input4, '')
    GUICtrlSetData($Input5, '')
    GUICtrlSetData($Input6, '')
    GUICtrlSetData($Input7, '')
    GUICtrlSetData($Input8, '')
    GUICtrlSetData($Input9, '')
    GUICtrlSetData($Input10, '')
    GUICtrlSetData($Input11, '')
    GUICtrlSetData($Input12, '')
    GUICtrlSetData($Input13, '')
    GUICtrlSetData($Input14, '')
    GUICtrlSetData($Input15, '')
    GUICtrlSetData($Input16, '')
    GUICtrlSetData($Input17, '')
    GUICtrlSetData($Input18, '')

    send( "{ENTER}" )

    Case $Button3

    GUICtrlSetData($Input1, '')
    GUICtrlSetData($Input2, '')
    GUICtrlSetData($Input3, '')
    GUICtrlSetData($Input4, '')
    GUICtrlSetData($Input5, '')
    GUICtrlSetData($Input6, '')

    send( "{ENTER}" )


    Case $Button4

    GUICtrlSetData($Input7, '')
    GUICtrlSetData($Input8, '')
    GUICtrlSetData($Input9, '')
    GUICtrlSetData($Input10, '')
    GUICtrlSetData($Input11, '')
    GUICtrlSetData($Input12, '')

    send( "{ENTER}" )

    Case $Button5

    GUICtrlSetData($Input13, '')
    GUICtrlSetData($Input14, '')
    GUICtrlSetData($Input15, '')
    GUICtrlSetData($Input16, '')
    GUICtrlSetData($Input17, '')
    GUICtrlSetData($Input18, '')


    send( "{ENTER}" )

    Case $Button6

    $Ausdauer3 = GUICtrlRead($Input13)
    $Tempo3 = GUICtrlRead($Input14)
    $Dressur3 = GUICtrlRead($Input15)
    $Gallopp3 = GUICtrlRead($Input16)
    $Trab3 = GUICtrlRead($Input17)
    $Springen3 = GUICtrlRead($Input18)

    GUICtrlSetData($Input1, $Ausdauer3)
    GUICtrlSetData($Input2, $Tempo3)
    GUICtrlSetData($Input3, $Dressur3)
    GUICtrlSetData($Input4, $Gallopp3)
    GUICtrlSetData($Input5, $Trab3)
    GUICtrlSetData($Input6, $Springen3)

    GUICtrlSetData($Input13, '')
    GUICtrlSetData($Input14, '')
    GUICtrlSetData($Input15, '')
    GUICtrlSetData($Input16, '')
    GUICtrlSetData($Input17, '')
    GUICtrlSetData($Input18, '')

    send( "{ENTER}" )

    Case $Button7

    $Ausdauer3 = GUICtrlRead($Input13)
    $Tempo3 = GUICtrlRead($Input14)
    $Dressur3 = GUICtrlRead($Input15)
    $Gallopp3 = GUICtrlRead($Input16)
    $Trab3 = GUICtrlRead($Input17)
    $Springen3 = GUICtrlRead($Input18)

    GUICtrlSetData($Input7, $Ausdauer3)
    GUICtrlSetData($Input8, $Tempo3)
    GUICtrlSetData($Input9, $Dressur3)
    GUICtrlSetData($Input10, $Gallopp3)
    GUICtrlSetData($Input11, $Trab3)
    GUICtrlSetData($Input12, $Springen3)


    send( "{ENTER}" )

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

    EndSwitch
    WEnd

    [/autoit]
  • Ok sorry, das Problem befand sich schon in dem Teil den du gepostet hattest. Aber es is leichter zu sehn wenn mans ausprobieren kann ^^
    Was bezweckst du mit dem Send('{Enter}') ?
    Damit hast du ne Endlosschleife gebaut, weil das send "nochmal den Button6 betätigt".

  • Hachje...Kopf ==> Tisch

    Das war eine Gewohnheitssache aus alten Tagen.
    Bei allen anderen Case-Anweisunden fiel es auch nicht auf.

    Ich danke dir vielmals :thumbup: