And sorry if there was any misunderstanding. It's that I do not speak English and I was with google help.
Code: Select all
procedure VerifyFPControlWord;
var
FPUCW: Word;
begin
FPUCW := Get8087CW();
if ( FPUCW <> $027F ) then
Set8087CW( $027F );
end;