taschenrechner (erweiterung)

[DeddyH]

Welche Ausgabe wovon?

[safak67]

Also ich habe ja die function geschrieben, aber wie gebe ich die berechnung aus..?

Delphi-Quellcode:

function TFormTR.BerechneTerm(ATerm: string): Double;
var
  Op: string;
  iPos, i: Integer;
  Seg1, Seg2: Double;
begin
  for i := 0 to 3 do
  begin
    case i of
      0: Op := '+';
      1: Op := '-';
      2: Op := '*';
      3: Op := '/';
    end;
    iPos := Pos(Op, ATerm);
    if iPos > 0 then
    begin
      Seg1 := BerechneTerm(Copy(ATerm, 1, iPos - 1));
      Seg2 := BerechneTerm(Copy(ATerm, iPos + 1, Length(ATerm)));
      case i of
        0: Result := Seg1 + Seg2;
        1: Result := Seg1 - Seg2;
        2: Result := Seg1 * Seg2;
        3: Result := Seg1 / Seg2;
      end;
      Exit;
    end;
  end;

end;

da unten muss ich ja jetzt die Ausgabe programmieren aber ich weiß nicht wie..

[DeddyH]

Die Funktion gibt Dir doch eine Double zurück, die kannst Du mit FloatToStr oder Format oder FormatFloat in einen String wandeln und den z.B. einem Label (genauer: dessen Caption) zuweisen. Das sind aber wirklich Grundlagen, die man beherrschen sollte.

[edit] Funktionsnamen verwechselt [/edit]

[Blup]

1. Welches Steuerelement in deinem Formular, soll den die Anzeige der Ergebnisse übernehmen?
2. Welchem Property hat dieses Steuerelemt, dem du das Ergebnis zuweisen möchtest? (der Hilfe zum Steuerelement entnehmen)
3. Welcher Datentyp ist für dieses Steuerelement erforderlich? (der Hilfe zum Property entnehmen)
4. In welchem Datentyp liegt das Ergebnis der Berechnungsfunktion vor? (in diesem Fall Double)
5. Wenn der Datentyp unterschiedlich ist, welche Funktion wandelt den Ergebnistyp in den Ausgabetyp? (der Hilfe zu Typumwandlungen entnehmen)
6. Gehirn einschalten und die Platzhalter mit den richtigen Namen austauschen.

AusgabeelementName.PropertyName := TypumwandlungsfunktionName(BerechneTerm(LabelAnzei ge.Caption));

(Parsen hat übrigens nichts mit der Ein- und Ausgabe von Werten zu tun.)

[Sharky]

Zitat:

Zitat von safak67

hat denn keiner ne idee wie ich das mit der ausgabe mache

Hai safak67,

bitte halten dich an die "ungeschriebenen" Regeln im Forum. Ein "puschen" von Beiträgen ist erst nach 24 Stunden erwünscht.

Ausserdem soll pro Thread immer nur eine Frage gestellt und beantwortet werden. Hier scheint das ganz aber langsam in die Richtung:
"Ich habe jetzt die nächste Funktion die ich nicht verstehe also helft mir bitte" zu laufen.

[safak67]

Ich habe jetzt ein ganz anderes problem, was ich vorher nicht hatte.. wenn ich das programm stare und ne berechnung durchführe, kommt links ne warnung...

'TLabel' enthält kein Element namens 'Caption' in Zeile 49

ich habe mehrere solcher fehler..

[mkinzler]

Starte mal die IDE neu. Aber sonst gilt schon das Gesagte: "Eine Frage pro Thread!"

[safak67]

Soll ich dann immer ein neuen Thread aufmachen?

[DeddyH]

Ja, pro Frage ein Thread, damit andere mit einem ähnlichen Problem auch später den passenden Thread finden können.

[mkinzler]

Ich sage nur Grundlagen, Grundlagen, Grundlagen

Zitat:

Soll ich dann immer ein neuen Thread aufmachen?

Ic
h weiss nicht, was es da zu missverstehen gibt: Eine Frage pro Thread bedeutet: Eine Frage Frage pro Thread

[safak67]

wegen der grundlagen.. also es ist nicht meine schuld das ich von null auf ein taschenrechner programmieren muss.. das mit den grundlagen hole ich auch nach aber sowas kann man nicht in zwei tagen lernen..
wenn ihr tipps hat wo ich die grundlagen besser lernen kann, her damit es ist nicht so das ich uninteressiert bin.. Ich will das ja auch lernen....

Ich arbeite zur Zeit mit dem Buch Delphi für Kids und Jrtzt lerne ich Delphi

[mkinzler]

http://www.delphi-treff.de/tutorials/grundlagen/

Da du aber nicht gewillt bist, neue Fragen in neuen Threads zu stellen, werde ich dich nun zwingen, in dem ich diesen hier schliesse!

* * * G E S C H L O S S E N* * *