Einzelnen Beitrag anzeigen

Benutzerbild von zecke
zecke

Registriert seit: 17. Jan 2004
494 Beiträge
 
Turbo Delphi für Win32
 
#4

Re: Kleines Rechnungsprogramm

  Alt 9. Okt 2005, 01:27
Zitat:
var erg : double;
Begin
erg := StrTioFloat(Edit1.text) + StrToFloat(Edit2.text) + StrToFloat(Edit3.text);
if erg > 100
then //was passieren soll wenn es über 100 ist
else //was passieren soll wenn es nicht über 100 ist
end;
StrToFloat natürlich, Tippföööhler - aber das wirst du selber gemerkt haben beim ausprobieren.
mfg zecke
  Mit Zitat antworten Zitat