Ich versuche gerade einen Fehler zu finden, der in einem Lohnberechnungsprogramm zu unschönen (und falschen) Centbeträgen in den Folgerechnungen führt.
Zunächst lese ich aus einer MySQL-Datenbank den Wert für den Stundenlohn ein.
Dort ist dieser als DECIMAL(6,2) gespeichert und beträgt 9,86
zs wird daraufhin 986
izs ebenfalls
und nach der Division steht in europstd 9,8599999999999994
Code: Alles auswählen
var izs : longint;
zs, europstd : double;
...
...
zs := SQLQuery1.Fields[3].AsFloat*100;
izs := Trunc (zs);
europstd := izs / 100;
Danke für's lesen
Christian