Mehrere Zahlen Rechnen

[KodeZwerg]

Dir fehlt an sehr vielen Stellen ein Terminator Zeichen.
Beispiel aus

Delphi-Quellcode:

procedure TForm4.EinsButtonClick(Sender: TObject);
begin
  edit1.Text:=edit1.Text+'1'
end;

würde ich ein

Delphi-Quellcode:

procedure TForm4.EinsButtonClick(Sender: TObject);
begin
  edit1.Text:=edit1.Text+'1';
end;

machen. Vielleicht liegt darin Dein Problem?

[DelphiDustin]

Zitat von KodeZwerg:

Dir fehlt an sehr vielen Stellen ein Terminator Zeichen.
Beispiel aus

Stimmt füg ich gleich hinzu

Zitat von KodeZwerg:

Vielleicht liegt darin Dein Problem?

Der Rechner funktioniert ja es geht mir nur darum mit mehreren zahlen als 2 zu rechnen

[Jonas Shinaniganz]

Naja, zur Zeit hast du ja nur 2 Textfelder für 2 Zahlen, wie möchtest du denn die weiteren Zahlen zum rechnen eingeben?
Gruß Jonas

[DelphiDustin]

Zitat von Jonas Shinaniganz:

Naja, zur Zeit hast du ja nur 2 Textfelder für 2 Zahlen, wie möchtest du denn die weiteren Zahlen zum rechnen eingeben?
Gruß Jonas

Ja ich weiß(hab übrigens nur ein textfeld für beide zahlen) ich möchte aber jetzt auch keine 20 weiteren doubles eingeben um damit zu rechnen es gibt ja bestimmt einen leicteren Weg über Arrays oder so

[Jonas Shinaniganz]

Ok, verstehe
Du könntest den Rechner so umbauen, dass dein Gleich-Button das Ergebnis zusätzlich noch in Zahl 1 speichert,
dann könnte man die nächste Zahl mit deinen Knöpfen eingeben und mit dem Ergebnis aus dem vorherigen Schritt weiter rechnen...

ich vermute das sind nicht "allzuviele" Anpassungen.

edit:

Manche Taschenrechner arbeiten auch auf die Art, dass wenn man als Beispiel 1+1 rechnet und dann nochmal + drückt, einfach erstmal 1+1 gerechnet wird und dann 2+ in der Eingabe steht. Dass wäre dann vergleichbar mit dem von mir beschriebenen Ansatz.

[DelphiDustin]

Zitat von Jonas Shinaniganz:

Ok, verstehe
Du könntest den Rechner so umbauen, dass dein Gleich-Button das Ergebnis zusätzlich noch in Zahl 1 speichert,
dann könnte man die nächste Zahl mit deinen Knöpfen eingeben und mit dem Ergebnis aus dem vorherigen Schritt weiter rechnen...

Das ist tasächlich schon möglich
Aber es wird von mir verlangt das der Rechner zum beispiel

Zahl1+Zahl2*Zahl3

direkt rechnen kann ohne einmal "=" Zu drücken.
Und natürlich mit Punkt vor Strich.

[KodeZwerg]

In meinem Calculator hab ich nur zwei Edit's, eins für Eingabe eins für Ausgabe.
Also bei einem weiteren "+" "-" "*" "/" etc wird mit der Ausgabe gearbeitet und dann eine Eingabe im ersten Edit erwartet (oder umgekehrt, ist schon ein paar Jahrzehnte her...).
Egal ob man zwischenzeitlich auf "=" klickt oder was auch immer macht, Input und Output halt miteinander in Harmonie ab-/arbeiten lassen.

Mfg.

[TurboMagic]

Zitat von KodeZwerg:

Dir fehlt an sehr vielen Stellen ein Terminator Zeichen.
Beispiel aus

Delphi-Quellcode:

procedure TForm4.EinsButtonClick(Sender: TObject);
begin
  edit1.Text:=edit1.Text+'1'
end;

würde ich ein

Delphi-Quellcode:

procedure TForm4.EinsButtonClick(Sender: TObject);
begin
  edit1.Text:=edit1.Text+'1';
end;

machen. Vielleicht liegt darin Dein Problem?

Nein, daran liegt es nicht, auch wenn es säuberer mit ist.
Es gibt nämlich eine kleine wenig beachtete Spezialregel für die Syntax:
vor dem letzten End des Blocks darf das ; weggelassen werden

Der Compiler meckert da nicht und das Programm tut, was man programmiert hat.

[Delphi-Laie]

Zitat von KodeZwerg:

Dir fehlt an sehr vielen Stellen ein Terminator Zeichen.
Beispiel aus

Delphi-Quellcode:

procedure TForm4.EinsButtonClick(Sender: TObject);
begin
  edit1.Text:=edit1.Text+'1'
end;

würde ich ein

Delphi-Quellcode:

procedure TForm4.EinsButtonClick(Sender: TObject);
begin
  edit1.Text:=edit1.Text+'1';
end;

machen. Vielleicht liegt darin Dein Problem?

Ist das Semikolon gemeint?

Wenn irgendwo eines fehlen täte, würde der Compiler es doch gleich monieren!

Tatsächlich ist das Semikolon in Pascal kein Terminatorzeichen. Man könnte es genausogut auch vor jede Anweisung schreiben, das wäre auch möglich und würde genausogut funktionieren. Doch es ist auch kein Einleitungszeichen.

In Wirklichkeit ist es ein (Ab)Trenn(ungs)zeichen und dient dazu, Anweisungen voneinander zu trennen (und genau dafür benutze ich es auch).

Den Unfug, daß hinter jeder Anweisung ein Semikolon zu setzen sei, ja gesetzt werden muß, las ich sogar schon in einem Delphibuch.

[hoika]

Hallo,
mehrere Zahlen + Klammern -> Formelparser.

Das ist dann kein Array, sondern ein Baum.
Die Knoten sind das jeweilige Rechenzeichen bzw. die Klammer.

Klingt etwas komplizierter -> ist es auch.