Hallo... Ich wollte einfach zum Üben einen Taschenrechner machen... Ich bin mir sicher, der Code würde kürzer gehen, aber darauf kommt es mir (im moment) nicht an
eventuell findet von euch jemand den fehler, das wenn ich z.b. 6,4 mal 6 nehme das dann 5 rauskommt...
Spoiler anzeigen
; Copyright by Alexander I*** (Jonathan)
;~ Includes
#NoTrayIcon
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <array.au3> ; <---- Brauche ich das?????
$aufgabe = ""
$ergebniss = ""
;~ Hier startet der GUI-Code
$Gui = GUICreate("Taschenrechner",240,250); <-- Erstelle die GUI
GUICtrlCreateLabel("Aufgabe:",5,8)
GUICtrlCreateLabel("Ergebiss:",5,34)
GUICtrlCreateLabel("© Copyright 2009 Jonathan Möwe",10,220)
$aufgabenlabel = GUICtrlCreateInput($aufgabe,50,5)
$ergebnisslabel = GUICtrlCreateInput($aufgabe,50,30)
$Button0 = GUICtrlCreateButton("0", 10, 60,30,30, $WS_GROUP)
$Button1 = GUICtrlCreateButton("1", 50, 60,30,30, $WS_GROUP)
$Button2 = GUICtrlCreateButton("2", 90, 60,30,30, $WS_GROUP)
$Button3 = GUICtrlCreateButton("3", 10, 100,30,30, $WS_GROUP)
$Button4 = GUICtrlCreateButton("4", 50, 100,30,30, $WS_GROUP)
$Button5 = GUICtrlCreateButton("5", 90, 100,30,30, $WS_GROUP)
$Button6 = GUICtrlCreateButton("6", 10, 140,30,30, $WS_GROUP)
$Button7 = GUICtrlCreateButton("7", 50, 140,30,30, $WS_GROUP)
$Button8 = GUICtrlCreateButton("8", 90, 140,30,30, $WS_GROUP)
$Button9 = GUICtrlCreateButton("9", 10, 180,30,30, $WS_GROUP)
$Buttonkomma = GUICtrlCreateButton(",", 50, 180,30,30, $WS_GROUP)
$Buttondel = GUICtrlCreateButton("del", 90, 180,30,30, $WS_GROUP)
$Buttonplus = GUICtrlCreateButton("+", 130, 60,30,30, $WS_GROUP)
$Buttonminus = GUICtrlCreateButton("-", 130, 100,30,30, $WS_GROUP)
$Buttonmal = GUICtrlCreateButton("X", 130, 140,30,30, $WS_GROUP)
$Buttongeteilt = GUICtrlCreateButton("/", 130, 180,30,30, $WS_GROUP)
$Buttonrechnen = GUICtrlCreateButton("LOS !", 170, 60,50,150, $WS_GROUP)
GUISetState(@SW_SHOW); <-- Zeige die GUI an
;~ Ende des GUI-Codes
While 1 ; <-- Endlosschleife anfangen
$nMsg = GUIGetMsg(); <-- Fange die Button-Events ab
Switch $nMsg ;<-- Unterscheide die Events
Case $GUI_EVENT_CLOSE ; <-- Wenn GUI geschlossen wird dann
Exit ; <-- Skript beenden
Case $Button0
$aufgabe = $aufgabe & "0"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Button1
$aufgabe = $aufgabe & "1"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Button2
$aufgabe = $aufgabe & "2"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Button3
$aufgabe = $aufgabe & "3"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Button4
$aufgabe = $aufgabe & "4"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Button5
$aufgabe = $aufgabe & "5"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Button6
$aufgabe = $aufgabe & "6"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Button7
$aufgabe = $aufgabe & "7"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Button8
$aufgabe = $aufgabe & "8"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Button9
$aufgabe = $aufgabe & "9"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Buttonkomma
$aufgabe = $aufgabe & ","
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Buttondel
$aufgabe = ""
$ergebniss = ""
GUICtrlSetData($ergebnisslabel,$ergebniss)
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Buttonplus
$aufgabe = $aufgabe & "+"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Buttonminus
$aufgabe = $aufgabe & "-"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Buttonmal
$aufgabe = $aufgabe & "*"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Buttongeteilt
$aufgabe = $aufgabe & "/"
GUICtrlSetData($aufgabenlabel,$aufgabe)
Case $Buttonrechnen
$ergebniss = Execute($aufgabe)
$aufgabe = ""
GUICtrlSetData($aufgabenlabel,$aufgabe)
GUICtrlSetData($ergebnisslabel,$ergebniss)
EndSwitch ; <-- Ende des Unterscheidens
WEnd ; <-- Beginne Schleife von Vorne