edit
War ein Denkfehler, ich glaub, jetzt hab ichs verstanden
der Wert steht zwar drin, kann aber wiederum nur mit einer anderen Currency verglichen werden, weil wie Himitsu schon sagte, der Vergleich schief geht.
Delphi-Quellcode:
var
cStart, c1, c2, c3, c4, cmax, cadd : Currency;
iAbsolute : Int64 absolute c1;
begin
cStart := 10000000000000;
cadd := 0.1;
c1 := cStart;
for i := 1 to 10 do begin
c1 := c1 + cAdd;
end; // for i
ShowMessage(IntToStr(iAbsolute)); // <- hier erscheint: 100000000000010000 (korrekt)
if c1 = 10000000000001 then
ShowMessage('Gleich = ');