易语言简易任务管理器

ccxk

没事干,把这个看完了:2022年最全 游戏逆向/脚本专题-零基础易语言教程_哔哩哔哩_bilibili

• 使用易语言编写的简易任务管理器
• 能够查看进程调用模块
• 存在挺多不完善地方'
• 调用模块:华侨精绘皮肤模块3.0，精易模块
  

1. .版本 2
   
2. .支持库 iext
   
3. 
   
4. .程序集 窗口程序集_启动窗口
   
5. .程序集变量 x, 整数型
   
6. 
   
7. .子程序 __启动窗口_创建完毕
   
8. 
   
9. 华侨_加载皮肤_简约白色 ()
   
10. 刷新进程 (真)
    
11. 
    
12. .子程序 _超级列表框1_鼠标右键被按下, 逻辑型
    
13. .参数 横向位置, 整数型
    
14. .参数 纵向位置, 整数型
    
15. .参数 功能键状态, 整数型
    
16. 
    
17. 弹出菜单 (进程, , )
    
18. 
    
19. 
    
20. .子程序 _刷新进程_被选择
    
21. 
    
22. 刷新进程 (真)
    
23. 
    
24. .子程序 _倒叙刷新_被选择
    
25. 
    
26. 刷新进程 (假)
    
27. 
    
28. .子程序 _超级列表框1_表头被单击
    
29. .参数 被单击列索引, 整数型
    
30. 
    
31. .如果 (x ＝ 0)
    
32.     超级列表框1.排序方式 ＝ 1
    
33.     刷新进程 (真)
    
34.     x ＝ 1
    
35. .否则
    
36.     超级列表框1.排序方式 ＝ 2
    
37.     刷新进程 (真)
    
38.     x ＝ 0
    
39. .如果结束
    
40. 
    
41. 
    
42. .子程序 刷新进程
    
43. .参数 排序方式, 逻辑型, , 真为正序,假为逆序
    
44. .局部变量 进程列表, 精易_进程信息数组, , "0"
    
45. .局部变量 进程数量, 整数型
    
46. .局部变量 i, 整数型
    
47. .局部变量 排序方式_方向, 整数型
    
48. .局部变量 位置索引, 整数型
    
49. .局部变量 进程名, 文本型
    
50. 
    
51. 超级列表框1.全部删除 ()
    
52. 进程数量 ＝ 进程_取系统进程列表 (进程列表)
    
53. .如果 (排序方式 ＝ 真)
    
54.     排序方式_方向 ＝ -1
    
55. .否则
    
56.     排序方式_方向 ＝ 0
    
57. .如果结束
    
58. 
    
59. .计次循环首 (进程数量, i)
    
60.     .如果 (进程_是否为64位 (进程列表 [i].进程标识符) ＝ 真)
    
61.         进程名 ＝ 进程列表 [i].进程名称 ＋ “[x64]”
    
62.     .否则
    
63.         进程名 ＝ 进程列表 [i].进程名称 ＋ “[x86]”
    
64.     .如果结束
    
65.     位置索引 ＝ 超级列表框1.插入表项 (排序方式_方向, 进程名, , , , )
    
66.     超级列表框1.置标题 (位置索引, 1, 到文本 (进程列表 [i].进程标识符) ＋ “[” ＋ 到文本 (进制_十到十六 (进程列表 [i].进程标识符, )) ＋ “]”)
    
67.     超级列表框1.置标题 (位置索引, 2, 进程_取程序路径 (进程列表 [i].进程标识符))
    
68. .计次循环尾 ()
    
69. 
    
70. 
    
71. .子程序 __启动窗口_尺寸被改变
    
72. 
    
73. 超级列表框1.宽度 ＝ _启动窗口.宽度 － 50
    
74. 超级列表框2.宽度 ＝ _启动窗口.宽度 － 50
    
75. 超级列表框1.高度 ＝ _启动窗口.高度 － 350
    
76. 超级列表框2.顶边 ＝ 超级列表框1.顶边 ＋ 超级列表框1.高度 ＋ 24
    
77. 
    
78. .子程序 _复制pid_被选择
    
79. .局部变量 被选中表项位置索引, 整数型, , "0"
    
80. .局部变量 pid, 文本型
    
81. 
    
82. 被选中表项位置索引 ＝ 超级列表框1.取被选择表项 ()
    
83. pid ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 1)
    
84. 剪辑板_置文本 (pid)
    
85. 
    
86. .子程序 _超级列表框1_表项被激活
    
87. .局部变量 模块数组, 精易_模块信息, , "0"
    
88. .局部变量 pid_origin, 文本型
    
89. .局部变量 pid, 文本型, , "0"
    
90. .局部变量 模块数量, 整数型
    
91. .局部变量 i, 整数型
    
92. .局部变量 索引, 整数型
    
93. 
    
94. 超级列表框2.全部删除 ()
    
95. pid_origin ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 1)
    
96. pid ＝ 分割文本 (pid_origin, “[”, )
    
97. 模块数量 ＝ 进程_ID取模块 (到整数 (pid [1]), 模块数组)
    
98. .计次循环首 (模块数量, i)
    
99.     索引 ＝ 超级列表框2.插入表项 (-1, 到文本 (模块数组 [i].模块文件名), , , , )
    
100.     超级列表框2.置标题 (索引, 1, 到文本 (模块数组 [i].模块句柄))
     
101.     超级列表框2.置标题 (索引, 2, 到文本 (模块数组 [i].大小))
     
102.     超级列表框2.置标题 (索引, 3, 到文本 (模块数组 [i].模块完整路径))
     
103. .计次循环尾 ()

复制代码

来自群组: 音之国度