AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Taschenrechner ein Editfeld

Ein Thema von Beat · begonnen am 30. Nov 2012 · letzter Beitrag vom 7. Dez 2012
Antwort Antwort
Seite 1 von 4  1 23     Letzte »    
Beat

Registriert seit: 30. Nov 2012
12 Beiträge
 
#1

Taschenrechner ein Editfeld

  Alt 30. Nov 2012, 20:40
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.
  Mit Zitat antworten Zitat
Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#2

AW: Taschenrechner ein Editfeld

  Alt 30. Nov 2012, 21:02
zu diesem Thema gibt es bereits etliche Beiträge.
Du findest sie unter http://www.delphipraxis.net/dp_searc...taschenrechner
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat
Beat

Registriert seit: 30. Nov 2012
12 Beiträge
 
#3

AW: Taschenrechner ein Editfeld

  Alt 30. Nov 2012, 21:07
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
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.033 Beiträge
 
Delphi 12 Athens
 
#4

AW: Taschenrechner ein Editfeld

  Alt 30. Nov 2012, 22:00
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.
ZahlImEdit := gespeicherteZahl [gepspeicherteOperation] ZahlImEdit;

Ein [=] oder die Löschentaste machen die Variablen leer und eventuell auch das Edit.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Popov
(Gast)

n/a Beiträge
 
#5

AW: Taschenrechner ein Editfeld

  Alt 30. Nov 2012, 22:17
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.
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.033 Beiträge
 
Delphi 12 Athens
 
#6

AW: Taschenrechner ein Editfeld

  Alt 30. Nov 2012, 23:01
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
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Popov
(Gast)

n/a Beiträge
 
#7

AW: Taschenrechner ein Editfeld

  Alt 30. Nov 2012, 23:10
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).
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.033 Beiträge
 
Delphi 12 Athens
 
#8

AW: Taschenrechner ein Editfeld

  Alt 30. Nov 2012, 23:55
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)
C 111111 + 222222 * ( 333333 + 444444 * 555555 div 666666 ) mod 123 = (Strg+C hier und Strg+V dort)
Angehängte Dateien
Dateityp: zip Taschenrechner.zip (209,2 KB, 19x aufgerufen)
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

Geändert von himitsu ( 1. Dez 2012 um 00:03 Uhr)
  Mit Zitat antworten Zitat
Beat

Registriert seit: 30. Nov 2012
12 Beiträge
 
#9

AW: Taschenrechner ein Editfeld

  Alt 1. Dez 2012, 11:06
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 (:

Geändert von Beat ( 1. Dez 2012 um 11:08 Uhr) Grund: Upps war nicht fertig ! ;D
  Mit Zitat antworten Zitat
Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#10

AW: Taschenrechner ein Editfeld

  Alt 1. Dez 2012, 11:12
Ü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
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 4  1 23     Letzte »    


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:10 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz