虚拟空间地址与页面号的转换

       当程序中出现内存写入访问错误时，ExcetionRecord.ExceptionInfomation数组第一个元素标识为写入；若是读取错误时，则 标识为读取状态。第二个元素，则是当前读取或写入的虚拟空间地址。在某些状况下，我们需要知道出错的虚拟地址所对应的虚拟内存页面，然后针对此页面做一些处理。那么如何由当前虚拟地址计算出对应的虚拟内存页面？

             delphi代码：

var
   pAddr, pPage: Pointer;
begin
   //此处省略若干行
   pAddr := Pointer(ExcetionInfo^.ExcetionRecord^.ExceptionInformation[1]);

   pPage := Pointer(Integer(pAddr) and (not (Page_Size - 1)))//Page_Size = 4096

end;

下面的内容，则是有关计算的原理和依据