系统监测模块 | CPU占用 MEM占用 磁盘读写 网卡速度

1. .版本 2
   
2. .支持库 spec
   
3. 
   
4. .程序集 窗口程序集_窗口1
   
5. 
   
6. .子程序 _窗口1_创建完毕
   
7. .局部变量 数组, 网卡信息_类型, , "0"
   
8. .局部变量 成员, 整数型
   
9. .局部变量 I, 整数型
   
10. 
    
11. 系统监测_初始 ()
    
12. ' -
    
13. 成员 ＝ 系统监测_网卡信息 (数组)
    
14. .计次循环首 (成员, I)
    
15.     调试输出 (数组 [I].网卡描述)
    
16. .计次循环尾 ()
    
17. 
    
18. .子程序 _窗口1_将被销毁
    
19. 
    
20. 时钟1.时钟周期 ＝ 0
    
21. 系统监测_卸载 ()
    
22. 
    
23. .子程序 开始检测
    
24. .局部变量 CPU占用, 整数型
    
25. .局部变量 MEM占用, 整数型
    
26. .局部变量 读取速度, 双精度小数型
    
27. .局部变量 写入速度, 双精度小数型
    
28. .局部变量 上传速度, 双精度小数型
    
29. .局部变量 下载速度, 双精度小数型
    
30. 
    
31. 系统监测_刷新 ()
    
32. 
    
33. 系统监测_CPU占用 (CPU占用)
    
34. 编辑框1.内容 ＝ “CPU占用：” ＋ 到文本 (CPU占用)
    
35. 
    
36. 系统监测_MEM占用 (MEM占用)
    
37. 编辑框2.内容 ＝ “MEM占用：” ＋ 到文本 (MEM占用)
    
38. 
    
39. 系统监测_磁盘读写 (读取速度, 写入速度)
    
40. 编辑框3.内容 ＝ “磁盘读写：” ＋ 到文本 (读取速度) ＋ “ | ” ＋ 到文本 (写入速度)
    
41. 
    
42. 系统监测_网卡速度 (上传速度, 下载速度)
    
43. ' 系统监测_网卡速度_自动 (上传速度, 下载速度)
    
44. ' 编辑框4.内容 ＝ “网卡速度：” ＋ 到文本 (上传速度) ＋ “ | ” ＋ 到文本 (下载速度)
    
45. 编辑框4.内容 ＝ “网卡速度：” ＋ 系统监测_字节格式 (上传速度, ) ＋ “ | ” ＋ 系统监测_字节格式 (下载速度, )
    
46. 
    
47. .子程序 _时钟1_周期事件
    
48. 
    
49. 开始检测 ()
    
50. 
    
51. .子程序 _按钮1_被单击
    
52. 
    
53. 时钟1.时钟周期 ＝ 1000

复制代码

游客，如果您要查看本帖隐藏内容请回复

谢谢分享好人有好报6666666

666666666666666666666666

不错！顶LZ

这个好好支持一下

顶一个了

回复查看隐藏内容

好好好好的我要下载看看看

11111111111111111111111111

这就是传说中的好资源吗？赶紧看看去！