获取内存信息
来源:互联网 发布:淘宝旗舰店查真假 编辑:程序博客网 时间:2024/05/01 17:24
var MemInfo: MEMORYSTATUS;
begin
// 获取内存信息
GlobalMemoryStatus(MemInfo);
Memo1.Lines.Add(IntToStr(MemInfo.dwMemoryLoad) + '%的内存在使用');
Memo1.Lines.Add('物理内存共有' + IntToStr(MemInfo.dwTotalPhys) + '字节');
Memo1.Lines.Add('未使用的物理内存有' + IntToStr(MemInfo.dwAvailPhys) + '字节');
Memo1.Lines.Add('交换文件的大小为' + IntToStr(MemInfo.dwTotalPageFile) + '字节');
Memo1.Lines.Add('未使用的交换文件大小为' + IntToStr(MemInfo.dwAvailPageFile) + '字节');
Memo1.Lines.Add('虚拟内存空间大小为' + IntToStr(MemInfo.dwTotalVirtual) + '字节');
Memo1.Lines.Add('未使用的虚拟内存大小为' + IntToStr(MemInfo.dwAvailVirtual) + '字节');
end;
begin
// 获取内存信息
GlobalMemoryStatus(MemInfo);
Memo1.Lines.Add(IntToStr(MemInfo.dwMemoryLoad) + '%的内存在使用');
Memo1.Lines.Add('物理内存共有' + IntToStr(MemInfo.dwTotalPhys) + '字节');
Memo1.Lines.Add('未使用的物理内存有' + IntToStr(MemInfo.dwAvailPhys) + '字节');
Memo1.Lines.Add('交换文件的大小为' + IntToStr(MemInfo.dwTotalPageFile) + '字节');
Memo1.Lines.Add('未使用的交换文件大小为' + IntToStr(MemInfo.dwAvailPageFile) + '字节');
Memo1.Lines.Add('虚拟内存空间大小为' + IntToStr(MemInfo.dwTotalVirtual) + '字节');
Memo1.Lines.Add('未使用的虚拟内存大小为' + IntToStr(MemInfo.dwAvailVirtual) + '字节');
end;
0 0
- 获取进程内存信息
- 获取内存信息
- Android 获取内存信息
- Android获取内存信息
- 获取内存缓冲区信息
- Android获取内存信息 .
- ios获取内存信息
- Android获取内存信息
- 获取内存信息
- Android获取内存信息
- Android获取内存信息
- c# 获取内存信息
- android获取内存信息
- 获取内存NUMA信息
- 用API获取内存信息
- 获取内存和CPU信息
- 获取Android手机内存信息
- Sigar获取内存的信息
- Memcached分析特点
- [转载]关于LWIP协议栈连续多次tcp_write后失败的解决过程
- iOS 之发送邮件的常用方法
- CSS2中display:table属性的用法详解
- (1) Appache Flume 中文介绍
- 获取内存信息
- AndroidStudio自定义属性xmlns无法识别问题解决in Gradle projects,always use http://schemas.android.com/apk/res-auto
- 持之以恒,善始善终
- strcpy
- 人民日报:那些“没脸回家”的年轻人应得到关注
- STL中的set容器的一点总结
- linux(ubtuntu)添加环境变量,立即生效
- sqlplus 组件意外被破坏恢复测试
- frame和iframe的区别