Anfänger Taschenrechner

    Hier ist mal mein Taschenrechner:

    code
    [autoit]

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

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

    $Form1 = GUICreate("Taschenrechner by Bahadir", 346, 386, 100, 100)
    GUISetBkColor(0x000000)
    $Input1 = GUICtrlCreateInput("", 56, 8, 281, 21)
    ;~ GUICtrlSetState(-1, $GUI_DISABLE)
    $exit = GUICtrlCreateButton("Exit", 8, 32, 75, 25, $WS_GROUP)
    $delete = GUICtrlCreateButton("Delete", 96, 32, 75, 25, $WS_GROUP)
    $ac = GUICtrlCreateButton("AC", 184, 32, 75, 25, $WS_GROUP)
    $pi = GUICtrlCreateButton("Pi", 264, 32, 75, 25, $WS_GROUP)
    $Button5 = GUICtrlCreateButton("Wurzel", 8, 64, 51, 33, $WS_GROUP)
    $Button6 = GUICtrlCreateButton("Sin", 64, 64, 51, 33, $WS_GROUP)
    $Button7 = GUICtrlCreateButton("CoSin", 120, 64, 51, 33, $WS_GROUP)
    $Button8 = GUICtrlCreateButton("x^x", 8, 104, 51, 33, $WS_GROUP)
    $Button9 = GUICtrlCreateButton("Tan", 64, 104, 51, 33, $WS_GROUP)
    $Button10 = GUICtrlCreateButton("ASin", 120, 104, 51, 33, $WS_GROUP)
    $Button11 = GUICtrlCreateButton("Bruch", 8, 144, 51, 33, $WS_GROUP)
    $Button12 = GUICtrlCreateButton("ATan", 64, 144, 51, 33, $WS_GROUP)
    $Button13 = GUICtrlCreateButton("ACosin", 120, 144, 51, 33, $WS_GROUP)
    $Button14 = GUICtrlCreateButton("Clear", 8, 184, 51, 33, $WS_GROUP)
    $Button15 = GUICtrlCreateButton("x ²", 64, 184, 51, 33, $WS_GROUP)
    $Button16 = GUICtrlCreateButton("x-¹", 120, 184, 51, 33, $WS_GROUP)
    $Button17 = GUICtrlCreateButton("1", 184, 64, 43, 25, $WS_GROUP)
    $Button18 = GUICtrlCreateButton("2", 240, 64, 43, 25, $WS_GROUP)
    $Button19 = GUICtrlCreateButton("3", 296, 64, 43, 25, $WS_GROUP)
    $Button20 = GUICtrlCreateButton("4", 184, 96, 43, 25, $WS_GROUP)
    $Button21 = GUICtrlCreateButton("5", 240, 96, 43, 25, $WS_GROUP)
    $Button22 = GUICtrlCreateButton("6", 296, 96, 43, 25, $WS_GROUP)
    $Button23 = GUICtrlCreateButton("7", 184, 128, 43, 25, $WS_GROUP)
    $Button24 = GUICtrlCreateButton("8", 240, 128, 43, 25, $WS_GROUP)
    $Button25 = GUICtrlCreateButton("9", 296, 128, 43, 25, $WS_GROUP)
    $Button27 = GUICtrlCreateButton("Komma", 184, 192, 43, 25, $WS_GROUP)
    $Button28 = GUICtrlCreateButton("= (Lösung)", 240, 192, 99, 25, $WS_GROUP)
    $Button29 = GUICtrlCreateButton("+ (Plus)", 8, 256, 75, 25, $WS_GROUP)
    $Button30 = GUICtrlCreateButton("- (Minus)", 88, 256, 83, 25, $WS_GROUP)
    $Button31 = GUICtrlCreateButton("/ (Geteilt)", 184, 256, 75, 25, $WS_GROUP)
    $Button32 = GUICtrlCreateButton("* (Mal)", 264, 256, 75, 25, $WS_GROUP)
    $Input2 = GUICtrlCreateInput("", 8, 8, 41, 21)
    GUICtrlSetState(-1, $GUI_DISABLE)
    $Button1 = GUICtrlCreateButton("0", 184, 160, 43, 25, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("00", 240, 160, 43, 25, $WS_GROUP)
    $Button3 = GUICtrlCreateButton("000", 296, 160, 43, 25, $WS_GROUP)
    $Edit1 = GUICtrlCreateEdit("Notizen", 8, 288, 329, 89)
    $Button4 = GUICtrlCreateButton("Credits", 8, 224, 331, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button4
    MsgBox(64,"Über/Credits","Dieser Taschenrechner ist von BBM gecodet")
    Case $Button3
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"000" )
    Case $Button2
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"00" )
    Case $ac
    Guictrlsetdata($Input1,"Cleared...")
    Sleep(100)
    Guictrlsetdata($Input1,"")
    Case $exit
    Exit
    Case $delete
    $old=GUICtrlRead($Input1)
    Guictrlsetdata($Input1,StringTrimRight(Guictrlread($Input1),1))
    Case $pi
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"3.14")
    Case $Button5
    $old=GUICtrlRead($Input1)
    Guictrlsetdata($Input1,Sqrt(GUictrlread($Input1)))
    Case $Button6
    $old = GUictrlread($Input1)
    Guictrlsetdata($Input1,Execute(Sin($old))&$old)
    Case $Button7
    $old = GUictrlread($Input1)
    Guictrlsetdata($Input1,Execute(Cos($old))&$old)
    Case $Button8
    $old=GUICtrlRead($Input1)
    $Input=Inputbox("Taschenrechner","Hoch wie viel?")
    Guictrlsetdata($Input1,Execute(GUICtrlRead($Input1)*GUICtrlRead($Input1)^$Input))
    Case $Button9
    $old = GUictrlread($Input1)
    Guictrlsetdata($Input1,Execute(Tan($old))&$old)
    Case $Button10
    $old = GUictrlread($Input1)
    Guictrlsetdata($Input1,Execute(ASin($old))&$old)
    Case $Button11
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"(Zahl1/Zahl2)")
    Case $Button12
    $old = GUictrlread($Input1)
    Guictrlsetdata($Input1,Execute(ATan($old))&$old)
    Case $Button13
    $old = GUictrlread($Input1)
    Guictrlsetdata($Input1,Execute(ACos($old))&$old)
    Case $Button14
    Guictrlsetdata($Input1,"")
    Case $Button15
    $old = GUictrlread($Input1)
    Guictrlsetdata($Input1,Execute($old*$old))
    Case $Button16
    $old = GUictrlread($Input1)
    GUictrlsetdata($Input1,Execute(Guictrlread($Input1)^-1))
    Case $Button17
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"1" )
    Case $Button18
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"2" )
    Case $Button19
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"3" )
    Case $Button20
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"4" )
    Case $Button21
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"5" )
    Case $Button22
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"6" )
    Case $Button23
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"7" )
    Case $Button24
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"8" )
    Case $Button25
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"9" )
    Case $Button27
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"." )
    Case $Button28
    $old=GUICtrlRead($Input1)
    $iErgebnis = Execute($old)
    GUICtrlSetData($Input2,"")
    GUICtrlSetData($Input1,$iErgebnis )
    Case $Button29
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input2,"+")
    GUICtrlSetData($Input1,$old&"+" )
    Case $Button30
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input2,"-")
    GUICtrlSetData($Input1,$old&"-" )
    Case $Button31
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input2,"/")
    GUICtrlSetData($Input1,$old&"/" )
    Case $Button32
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input2,"*")
    GUICtrlSetData($Input1,$old&"*" )
    Case $Button1
    $old=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$old&"0" )
    EndSwitch
    WEnd

    [/autoit]


    mal euer feedback hören :D^^

    Viele Funktionen, aber eigentlich ein "Standarttaschenrechner", wie's ihn hier schon oft gibt...
    Funktionen wie Graphen zeichnen, Geleichungen lösen und so wär interessant :D
    Oder ein üblisches Taschenrechnerdesign, so wie man sie auch iom Rl hat.

    Feedback hm. Also Credits Button ist ziemlich übertrieben, AC ist bekanntlich C, Output könnte nen GUICtrlSetFont gut vertragen, Notizen = gute Idee aber auch zu gross, () sind überflüssig weil kennt eh jeder.

    Naja aber für'n Anfänger ganz ok, funzt soweit alles

    Eigentlich ganz gut gelungen.
    Eine Sache was ich nicht so mag ist die Kompaktheit des Rechners, aber dann gleichzeitig auch die vielen Funktionen.
    Da muss ich immer suchen um die richtigen Tasten zu finden ;) .
    Kommt aber warscheinlich auch daher, dass ich den Taschenrechner nicht gewöhnt bin.
    Aber sonst find ich den eigentlich prima.

    danke, das mit den grafiken wird sicher schwer ^^
    ich versuchs mal, kann aber lange dauern. bin mit spielen beschäftigt XD