您现在的位置:首页 >> 硬件系统 >> 硬件系统 >> 内容

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

时间:2011/9/3 15:20:18 点击:

  核心提示:Windows利用页交换文件来扩充应用程序实际可用的内存,而不仅限于实际的32兆或64兆物理内存。但是Windows的页交换文件是所有程序共用的,所以我们的程序要想获得更大的内存还是比较困难,比如60...

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);

作者:网络 来源:转载
共有评论 0相关评论
发表我的评论
  • 大名:
  • 内容:
  • 盒子文章(www.2ccc.com) © 2024 版权所有 All Rights Reserved.
  • 沪ICP备05001939号