delphi – 为什么应用程序以不同于Default8087CW的FPU控制字开始

当我们创建一个新的VCL应用程序时,控制字设置为1372h.这是我不明白的第一件事,为什么是1372h而不是1332h这是System80中定义的Default8087CW.

这两者之间的区别：

1001101110010  //1372h
1001100110010  //1332h

是根据文档保留或不使用的第6位.

第二个问题关于CreateOleObject.

function CreateOleObject(const ClassName: string): IDispatch;
var
  ClassID: TCLSID;
begin
  try
    ClassID := ProgIDToClassID(ClassName);
{$IFDEF CPUX86}
    try
      Set8087CW( Default8087CW or $08);
{$ENDIF CPUX86}
      OleCheck(CoCreateInstance(ClassID,nil,CLSCTX_INPROC_SERVER or
        CLSCTX_LOCAL_SERVER,IDispatch,Result));
{$IFDEF CPUX86}
    finally
      Reset8087CW;
    end;
{$ENDIF CPUX86}
  except
    on E: EOleSysError do
      raise EOleSysError.Create(Format('%s,ProgID: "%s"',[E.Message,ClassName]),E.ErrorCode,0) { Do not localize }
  end;    
end;

上述功能是将控制字改为137Ah,所以打开第3位(溢出掩码).我不明白为什么调用Reset8087CW之后,而不是恢复进入功能之前的单词的状态？