Delphi获取Windows物理及虚拟内存信息.rar

Delphi获取Windows物理及虚拟内存信息，部分调试代码如下所示： 　　MemInfo.dwLength:=sizeof(MEMORYSTATUS); 　　//用sizeof(MEMORYSTATUS)填充dwLength成员 　　 GlobalMemoryStatus(MemInfo); 　　//获取内存信息 　　 Edit1.Text:=IntToStr(MemInfo.dwMemoryLoad) '%'; 　　//内存使用百分比 　　 Edit2.Text:=IntToStr(MemInfo.dwTotalPhys); 　　//总物理内存(字节) 　　 E