|
Registriert seit: 30. Sep 2006
Ort: Gundelfingen
1.109 Beiträge
Delphi 2007 Professional
|
Re: case Wertausgabe Endbetrag
1. Apr 2008, 21:51
Ist es gewollt das wenn RadioGroup1.ItemIndex == 2 dass dan 2 mal nettowert addiert wird oder hast du hier ein + mit einem * verwechselt?
Ansonsten musst du entweder runden (bruttowert := Round(nettowert * (7 /100) + nettowert)) oder du verwändest statt Integer Real/Double/Extended
Dann musst du aber FloatToStr statt IntToStr nehmen
Dominik
Wer anderen eine Grube gräbt, hat ein Gruben-Grab-Gerät!
|