Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.270 Beiträge
 
Delphi 10.4 Sydney
 
#12

AW: Kaufmännische Runden geht nicht !

  Alt 4. Feb 2014, 16:08
Hallo,

es gab vor etwa einem Jahr mal nen Thread dazu,
nachdem keine der Funktionen so richtig funktioniert hatte,
habe ich mir was eigenes gebaut, was auf String-Handling basiert,
also mit Nullen auf 3 Kommastellen auffüllen,
3. Stelle nach Null prüfen, wenn >=5 aufrunden, sonst abrunden ...

Danach das Komma entfernen und ich habe sofort meine EuroCent als Integer.


Heiko
Heiko
  Mit Zitat antworten Zitat