Hi,
also bei mir (Delphi 7) sind es 20 Stellen.
Kannst du aber auch einfach Testen:
Delphi-Quellcode:
procedure Test;
var
ext1, ext2: Extended;
begin
ext1 := 0.12345678901234567891;//0.123456789012345678901
ext2 := 0.12345678901234567892;//0.123456789012345678902
if (ext1 = ext2) then
showmessage('Gleich! => Weniger als 20 Stellen.')
else
showmessage('Ungleich! => Mehr oder 20 Stellen.');
end;
Also wenn ich das so laufen lasse, dann bekomme ich die Meldung "Mehr oder Stellen".
Wenn du die Auskommentierten Zahlen benutzt, sollte der Vergleich true ergeben und es sind dann
weniger als 21 stellen.
Gruß
Jonny