Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Amateurprofi,
26. Aug 2012
In der Prozedur Button1Click steht nicht nur fSum:=0 sondern zwei Zeilen weiter Edit2.Text:=''. Alternativ könntest du auch schreiben Edit2.Text:='0' oder, wenn es dir besser gefällt Edit2.Text:=FloatToStr(fSum).
Ich halte es für besser ein leeres Textfeld zu zeigen, denn genau genommen existiert nach dem Zurücksetzen noch keine Summe, und genau das drücke ich durch ein leeres Textfeld aus....
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Amateurprofi,
25. Aug 2012
Das entspräche aber nicht der Aufgabe in der von 2 Edits und einem Button, nicht aber von einem Label die Rede ist.
Kurze Erklärung
Im Button1.Click werden die Inhalte der beiden Edits gelöscht und die Summe der Zahlen (fSum) auf 0 gesetzt.
Im Edit1KeyUp passiert folgendes
Prüfung ob die gerade gelöste Taste die Return-Taste ist UND ob Edit1 einen Text enthält.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Amateurprofi,
24. Aug 2012
Hallo diavy,
wenn ich die von dir gepostete Aufgabenstellung richtig interpretiere, dann sollen auf der Form 2 Edits und ein Button sein.
Zahlen, die in Edit1 eingegeben werden, sollen summiert und die Summe in Edit2 ausgegeben werden.
Das könnte man so lösen:
In TForm ein Feld fSum:double deklarieren.
Dann :