[How-To]AutoIt Rechner für anfänger!

09/16/2010 06:23 *-_JuLi²_-*#1
Hallo ich zeige euch hier einen Rechner mit AutoIt anfänger bitte kein zeugs wie "Das weiß ich doch schon lange" oder so schreiben da ich selbst noch AutoIt anfänger bin.

also fangen wir an mit Koda
ihr könnt die Form beliebig machen aber es muss mindestens 1 Button sein auf den Button muss folgendes draufstehen z.B "Addieren" oder "Subtrahieren"
ihr könnt aber auch alle Rechnungsarten benutzten ich habe jetzt mal nur Addieren und Subtrahieren genommen
so kommen wir zum script also wie immer die GUI vom Koda einfügen in dein Script.
So sollte es ungefähr aussehen:
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Rechner", 213, 52, 193, 125)
$Button1 = GUICtrlCreateButton("Addieren", 16, 16, 75, 25)
$Button2 = GUICtrlCreateButton("Subtrahieren", 104, 16, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

	EndSwitch
WEnd
weiter gehts zum eigentlichen script
wenn ihr euch jetzt denkt was ich drück auf Subtrahieren und nichts passiert!?! ist ja kla du musst erst mal
Code:
Case $Button1
schreiben aber unter dem wo schon ein "Case" ist
und da ja bei mir Button1 Addieren ist muss ich ja auch schreiben das er Addieren soll das geht so:
Code:
Case $Button1
$Zahl1 = Inputbox(0,"1.Zahl", "Bitte gebe hier die erste Zahl ein!"
$Zahl2 = Inputbox(0,"2.Zahl", "Bitte gebe hier die zweiter Zahl ein!")
$Ergebniss = Msgbox("Ergebniss", "Das Ergebniss = " & $Zahl1 + $Zahl2")
Das heißt:
Wenn ich $Button1 drücke soll er nach der 1.Zahl fragen
gebe ich eine Zahl ein
und drücke ok
soll er nach der 2.Zahl fragen
wenn ich da wieder eine zahl eingebe
und dann auf ok drücke kommt das Ergebniss
also und bei Subtrahieren soll das selbe passieren nur eben mit "-"
also wieder
Code:
Case $Button2
$Zahl3 = Inputbox(0,"1.Zahl", "Bitte gebe hier die erste Zahl ein!"
$Zahl4 = Inputbox(0,"2.Zahl", "Bitte gebe hier die zweiter Zahl ein!")
$Ergebniss1= Msgbox("Ergebniss", "Das Ergebniss = " & $Zahl3 - $Zahl4)
Mit 4 Rechnungsarten kann man es so machen
PHP Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 GUICreate("Rechner"284171193125)
$Button1 GUICtrlCreateButton("Addieren (+)"16249149)
$Button2 GUICtrlCreateButton("Subtrahieren (-)"16849149)
$Button3 GUICtrlCreateButton("Multiplizieren (x)"140199149)
$Button4 GUICtrlCreateButton("Dividieren (:)"140879149)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg 
GUIGetMsg()
    Switch 
$nMsg
    
Case $GUI_EVENT_CLOSE
        
Exit
        Case 
$Button1
$Zahl1 
InputBox("Rechner","Gebe hier die erste Zahl ein")
$Zahl2 InputBox("Rechner","Gebe hier die zweite Zahl ein")
$Ergebniss1 MsgBox(0"Rechner","Das Ergebniss ist: " &  $Zahl1 $Zahl2)

Case 
$Button2 
$Zahl3 
InputBox("Rechner","Gebe hier die erste Zahl ein")
$Zahl4 InputBox("Rechner","Gebe hier die zweite Zahl ein")
$Ergebniss2 MsgBox(0"Rechner","Das Ergebniss ist: " &  $Zahl3 $Zahl4)

Case 
$Button3
$Zahl5 
InputBox("Rechner","Gebe hier die erste Zahl ein")
$Zahl6 InputBox("Rechner","Gebe hier die zweite Zahl ein")
$Ergebniss3 MsgBox(0"Rechner""Das Ergebniss ist: " $Zahl5 $Zahl6)

Case 
$Button4
$Zahl7 
InputBox("Rechner","Gebe hier die erste Zahl ein")
$Zahl8 InputBox("Rechner","Gebe hier die zweite Zahl ein")
$Ergebniss4 MsgBox(0"Rechner","Das Ergebniss ist: " $Zahl7 $Zahl8)            

    EndSwitch
WEnd 
und Tadaa fertig ist euer Rechner :D
Lg dragon0660
09/16/2010 14:40 ♠As♠#2
Ich will ja jetzt net mekern aber es gibt bessere wege als diese
09/16/2010 14:45 v0lle#3
Quote:
Originally Posted by ♣As♣ View Post
Ich will ja jetzt net mekern aber es gibt bessere wege als diese
Wie wärs wenn du dir den 1. Post RICHTIG durchliest !
Er will solche Kommentare hier nicht haben und dragon0660 sagte auch das er noch Anfänger ist !
09/16/2010 14:48 GoldenPeach#4
Ich finds gut :)
Gibt zwar schon sowas, aber für die Arbeit kriegste´n THX.
Hilft Anfängern bestimmt gut weiter, weiter so.
09/16/2010 17:35 Lawnmove#5
Jop, guter Job !
Dragon , in nem nächsten Update erwarte ich das dein Rechner auch
Hex -> Dec
&
Dec -> Hex
vielleicht auch noch Septal und Oktal und Binär kann ^^ *freches Grinsen

Meiner kanns. Ist einfach zu baun und sehr lehrreich.
Versuchs selber :)
09/16/2010 18:57 *-_JuLi²_-*#6
Quote:
Originally Posted by Lawnmove View Post
Jop, guter Job !
Dragon , in nem nächsten Update erwarte ich das dein Rechner auch
Hex -> Dec
&
Dec -> Hex
vielleicht auch noch Septal und Oktal und Binär kann ^^ *freches Grinsen

Meiner kanns. Ist einfach zu baun und sehr lehrreich.
Versuchs selber :)
Dec -> Hex??

Septal und Oktal??

Binär??

wird schwer wenn ich nicht weiß was das ist :D
09/19/2010 10:09 DraaaKe#7
Wenn er Anfänger ist dann soll er doch einfach selber üben und nicht so etwas hier rein schreiben. Den das kann wirklich jeder der Anfänger ist auch schon alleine. Es gibt bessere Befehle das ganze ausrechnen zu lassen. (Hab selber einen Rechner mit beinahe allen Rechnungsarten, und nicht mal das war schwer)
01/17/2011 03:02 DrAcHe981#8
hab meinen rechner nun mit seiner hilfe verbessern können der wollte nicht so wie ich es wollte^^
__________________________________________________ _________________
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("", 271, 224, 192, 191)
$Edit1 = GUICtrlCreateEdit("", 0, 0, 265, 33, $ES_WANTRETURN)
GUICtrlSetData(-1, "")
$Button1 = GUICtrlCreateButton("9", 64, 80, 49, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("8", 120, 80, 49, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("7", 176, 80, 49, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("6", 64, 112, 49, 25, $WS_GROUP)
$Button5 = GUICtrlCreateButton("5", 120, 112, 49, 25, $WS_GROUP)
$Button6 = GUICtrlCreateButton("4", 176, 112, 49, 25, $WS_GROUP)
$Button7 = GUICtrlCreateButton("3", 64, 144, 49, 25, $WS_GROUP)
$Button8 = GUICtrlCreateButton("2", 120, 144, 49, 25, $WS_GROUP)
$Button9 = GUICtrlCreateButton("1", 176, 144, 49, 25, $WS_GROUP)
$Button10 = GUICtrlCreateButton("0", 64, 176, 49, 25, $WS_GROUP)
$Button11 = GUICtrlCreateButton("+", 8, 96, 33, 25, $WS_GROUP)
$Button12 = GUICtrlCreateButton("-", 8, 128, 33, 25, $WS_GROUP)
$Button13 = GUICtrlCreateButton("*", 8, 160, 33, 25, $WS_GROUP)
$Button14 = GUICtrlCreateButton("/", 8, 192, 33, 25, $WS_GROUP)
$Button15 = GUICtrlCreateButton("=", 120, 176, 105, 25, $WS_GROUP)
$Label1 = GUICtrlCreateEdit("", 0, 32, 265, 33,$ES_WANTRETURN)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Button1
GUICtrlSetData($Edit1,"9",1)
Case $Button2
GUICtrlSetData($Edit1,"8",1)
Case $Button3
GUICtrlSetData($Edit1,"7",1)
Case $Button4
GUICtrlSetData($Edit1,"6",1)
Case $Button5
GUICtrlSetData($Edit1,"5",1)
Case $Button6
GUICtrlSetData($Edit1,"4",1)
Case $Button8
GUICtrlSetData($Edit1,"2",1)
Case $button7
GUICtrlSetData($Edit1,"3",1)
Case $Button9
GUICtrlSetData($Edit1,"1",1)
Case $Button10
GUICtrlSetData($Edit1,"0",1)
Case $Button11
Global $calc = "+"
Global $erg1 = GUICtrlRead($Edit1)+GUICtrlRead($Label1)
Case $Button12
Global $calc = "-"
Global $erg1 = GUICtrlRead($Edit1)-GUICtrlRead($Label1)
Case $Button13
Global $calc = "*"
Global $erg1 = GUICtrlRead($Edit1)*GUICtrlRead($Label1)
Case $Button14
Global $erg1 = GUICtrlRead($Edit1)/GUICtrlRead($Label1)
Case $GUI_EVENT_CLOSE
Exit
Case $Button15
_erg()
EndSwitch
WEnd
Func _erg()
MsgBox(64,"ergebniss","das ergebnis ist: "&$erg1)
EndFunc