Taschenrechner ein Editfeld

[Beat]

Hallo liebe Community ;),

Ich habe mich hier angemeldet um von euch ein bisschen Hilfe zu bekommen.
Also meine Frage.
In meinem Informatikkurs sollen wir einen Taschenrechner programmieren, welcher eiN Editfeld besitzt. Wenn man nun die Zahlen z.B 123 eintippt , dann auf plus geht (es sollen alle Rechenoperation, sprich addieren, subtrahieren, divideren und multiplizieren, möglich sein), soll das Feld leer sein und bereit für die nächste Zahl sein. Auch sollen mehrere Additionen aufeinander folgen können, sprich 1 + 2 + 3 .
Nun, ich bin schon soweit, dass die Zahlen in das Editfeld eingetragen werden.
Code

form1.Ausgabe.Text := form1.Ausgabe.Text + '1' ;

Dieser sollte dafür doch schonmal in Ordnung sein , oder ?
Auch habe ich schon das abspeichern der ersten zahl geschafft, indem ich sie als eine Variable im Rechenoptionsbutton
bestimmt hab. Nun, wie mache ich es, dass wenn ich danach auf den '=' Button drücke, er sozusagen erkennt, dass ich die Rechenoption addieren gewählt habe ? :)
Und wie mache ich das mit der Schleife, also dem mehrfach addieren o.ä. .

Mein Lehrer meinte etwas von If - Schleife und Zwischenergebns abspeichern.

Hoffe auf verständliche Hilfe.

[Bummi]

zu diesem Thema gibt es bereits etliche Beiträge.
Du findest sie unter http://www.delphipraxis.net/dp_searc...taschenrechner

[Beat]

Zitat:

Zitat von Bummi (Beitrag 1193775)

zu diesem Thema gibt es bereits etliche Beiträge.
Du findest sie unter http://www.delphipraxis.net/dp_searc...taschenrechner

Vielen Dank, ich hatte schon ein bisschen gesucht, hatte mich aber dann irgendwie verirrt ;)

[himitsu]

In deinem Fall ist es recht einfach.

Beim Klick auf eine Zahl wird diese Zahl an den Text im Edit angehängt und das Gleiche mit dem Komma.

Wird eine Befehlstaste [+-*/=] gedrückt, dann mußt du das Edit leer machen
und vorher noch den Befehl und die Zahl (in dem Edit) in Variablen speichern
und bevor du das machst, wird noch schnell geschaut, ob in den Variablen Befehl+Zahl gespeichert wurden.
Wenn Ja, dann wird Dieses noch schnell auf den Wert im Edit angewendet, bevor die neuen Daten darin gespeichert werden.

Delphi-Quellcode:

ZahlImEdit := gespeicherteZahl [gepspeicherteOperation] ZahlImEdit;

Ein [=] oder die Löschentaste machen die Variablen leer und eventuell auch das Edit.

[Popov]

Da Fällt mir eine Frage ein - hat hier schon einer mal einen richtigen Taschenrechner als Beispiel programmiert? Damit meine ich keinen Parser und keine zwei Felder die zusammenaddiert werden, sondern einen Taschenrechner?

Da muß natürlich beachtet werden, dass 1 + 2 * 3 gleich 7 sind. Kleiner Witz am Rande - der Windows Rechner (Standard Modus) gibt da 9 zurück.

[himitsu]

Such mal ... da gibt es Mehrere.

Und der Windows-Rechner rechnet vollkommen korrekt.
- unter der Betrachtung, daß er schon immer so rechnet und man ein Standardverhalten nicht ändern sollte
- daß bei nur 2 Nummernspeichern es nicht anders gerechnet werden kann

[Popov]

Der Windows Rechner hat zwei Modi. Standard ergibt bei 1 + 2 * 3 eben 9, der Wissenschaftlicher Rechner 7. Der Standard rechnet also falsch.

Was die Rechner im Board angeht, ich hab keine Lust zu suchen, weil mich das nicht sonderlich interessiert. Nur ist mir bei den ganzen Fragen stets um Taschenrechner noch nie ein "richtiger" untergekommen (ich hab aber auch nie so richtig drauf geachtet).

[himitsu]

Man muß eben bedenken

- Standard rechnet so, wie er es immer gemacht hat und wie man es von alten/billigen Taschenrechnern noch kennt und wie es auch der Abakus rechnen würde ... mit nur zwei Zahlenspeichern und einen Schritt nach dem Anderem, so wie man es eingibt (ohne Beachtung Kenntnis der Rechenregeln)

- Erweitert und Co. arbeiten mit Klammern und/oder mit Mathe-Parser, welcher erst nach kompletter Eingabe die Berechnung durchführt, bzw. alle vorhergehenden Eingaben mathematisch nachträglich mit einbeziehen.

Der hier war mal eine kleine Funktionsstudie, um den "Standard"-Rechner mit einem Mathe-Parser zu kombinieren.
(drinnen steckt ein Mathe-Parser, der aber so genutzt wird, daß er Schrittweise rechnen kann ... leider hat sich das System nicht so durchgesetzt)

Delphi-Quellcode:

C 111111 + 222222 * ( 333333 + 444444 * 555555 div 666666 ) mod 123 =

(Strg+C hier und Strg+V dort)

[Beat]

Hallo himitsu :)
Das mit dem Variablen speichern und Felder leer machen, das hatte ich schon :)
Mein Lehrer meinte, ich solle doch erstmal das öfters aufeinander rechenn auslassen, also 1+1+1 .. .
und mich erst an die Rechenoperationen wagen. Übernacht ist mir dann was eingefallen,
ich habe mir jetzt für den plus, minus, geteilt und mal Button 4 Variablen angelegt(zwischenplus, zwischenminus, zwischengeteilt,zwischenmal ). D´Soweit so gut. Nun möchte ich, dass der '=' Button, nachschaut ob z.B die Variable zwischenplus einene Wert hat. Ich hatte mir sowas in der Art vorgestellt.

Code:

if zwischenplus = true then procedure addieren
else zwischenminus =true then procedure subtrahieren

Undso weiter. Mein Problem nun, ich hatte in der Schule nur kurz Zeit mir in der DElphi Hilfe den IF Befehl anzugucken. Ich kenne ihn also nicht gut :) Ich hoffe ihr habt das Prinzip verstandne und könnt mir den IF Befehl irgendwie näher bringen (:

[Sir Rufo]

Überleg doch mal, wie du einen Taschenrechner bedienst, dann weißt du auch, was du dir merken musst.

Wenn du 8+5 ausrechnen möchtest, dann doch so

Code:

8 (im Edit Feld)
+ (Button drücken)
5 (im Edit Feld)
= (Button drücken)

Um das auszurechnen musst du den ersten Wert noch wissen (8) und die gewünschte Rechenoperation (+).
Den zweiten Wert bekommst du aus dem Edit-Feld.

Also brauchst du 2 Variablen um dir dieses zu merken :)