利用内存映射文件扩充程序可用的内存_delphi教程

               利用内存映射文件扩充程序可用的内存

Windows利用页交换文件来扩充应用程序实际可用的内存，而不仅限于实际的32兆或64兆物理内存。但是Windows的页交换文件是所有程序共用的，所以我们的程序要想获得更大的内存还是比较困难，比如600兆或者更多。难道就没有办法了吗？Windows提供的内存映射文件为我们提供解决问题的途径。

在硬盘上建立一个600兆的文件，然后将它映射到我们进程的地址空间，Windows会返回一个指向这块内存地址的指针，我可以像使用一个600兆的大数组一样使用该指针，Windows会为我们做好从硬盘文件到内存和从内存到硬盘文件的交换工作，就像我们使用Windows本身的虚拟内存一样，不用我们费一点心思，而且速度很快。

具体方法如下：

//先在硬盘上建立一个文件，访问标志为可读写，

hFile := CreateFile(PChar(FileName), GENERIC_READ or GENERIC_WRITE, 0, nil, OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0);

//创建文件映射对象, iFileSize指定要建立的映射文件的大小，例如600兆 则iFileSize = 1024 * 1024 *600。当我们打开的硬盘上的文件没有这么大时，Windows会自动将该文件扩展到指定的大小。

hFileMap := CreateFileMapping(hFile, nil, Page_ReadWrite, 0,  iFileSize, nil);

//将文件数据映射到进程的地址空间

pData := MapViewOfFile(FMapHandle, FILE_MAP_WRITE, 0, 0, iFileSize);

然后我们就可以通过pData指针充分利用Windows为我们多扩充的这600兆内存了。当然是用完以后，要做一些清场工作。

//从进程的地址空间中撤销映射

UnmapViewOfFile(pData);

//关闭文件映射对象和打开的文件

CloseHandle(hFileMap);

CloseHandle(hFile);