-
Delphi获取Windows物理及虚拟内存信息.rar下载
资源介绍
Delphi获取Windows物理及虚拟内存信息，部分调试代码如下所示：
MemInfo.dwLength:=sizeof(MEMORYSTATUS);
//用sizeof(MEMORYSTATUS)填充dwLength成员
GlobalMemoryStatus(MemInfo);
//获取内存信息
Edit1.Text:=IntToStr(MemInfo.dwMemoryLoad) '%';
//内存使用百分比
Edit2.Text:=IntToStr(MemInfo.dwTotalPhys);
//总物理内存(字节)
Edit3.Text:=IntToStr(MemInfo.dwAvailPhys);
//未使用物理内存(字节)
Edit4.Text:=IntToStr(MemInfo.dwTotalPageFile);
//交换文件大小(字节)
Edit5.Text:=IntToStr(MemInfo.dwAvailPageFile);
//未使用交换文件大小(字节)
Edit6.Text:=IntToStr(MemInfo.dwTotalVirtual);
//虚拟内存空间大小(字节)
Edit7.Text:=IntToStr(MemInfo.dwAvailVirtual);
//未使用虚拟内存大小(字节)
end;