Exponent aus Extended extrahieren?

[stoxx]

bei "schnell" dachte ich eher an Assembler und SHL Befehle und so ..





ich hab hier auch schon was gefunden.

http://www.delphipraxis.net/internal...light=mantisse


warum muss man erst den Exponent erst mit

if ExtRec(B).Exp and $7FFF = $7FFF then prüfen?

und warum steht da noch?

(ExtRec(B).Exp and $7FFF) - $3FFE - 64;