dann setz das result halt auf extended
function modulo(m: Extended; n: Integer): extended;
da m ja bei dir auch extended ist als werte-parameter
aber um das umzuwandeln hilft halt
round bzw
trunc aber bei so großen zahlen bringt das ja auch nicht so viel, da Int64 ja max 9*10^18 aufnehmen kann und ggf. der rest größer ist als dieser wert, aber schau dir mal
http://www.michael-puff.de/Developer...agen_Reddmann/ an, vllt gibts ja da etwas