教程里仿任务管理器查看进程的显示加对齐空格
自己写了个判断根据序号,PID的长度来加不同长度的空格,列表框里的显示结果看起来舒服多了,新手小白,高手勿笑应该还有更简洁的方法来实现空格对齐,想了解一下.版本 2
.支持库 eAPI
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 数组, 进程信息, , "0"
.程序集变量 成员数, 整数型
.子程序 _按钮1_被单击
.局部变量 n, 整数型
.局部变量 k, 文本型, , , 进程序号和PID之间的空格数量
.局部变量 m, 文本型, , , PID和进程名之间的空格数量
数组 = 取系统进程列表 ()
成员数 = 取数组成员数 (数组)
.计次循环首 (成员数, n)
.判断开始 (n < 10)
k = “ ”
.判断 (n < 100)
k = “ ”
.判断 (n < 1000)
k = “ ”
.默认
.判断结束
.判断开始 (数组 .进程标识符 < 10)
m = “ ”
.判断 (数组 .进程标识符 < 100)
m = “ ”
.判断 (数组 .进程标识符 < 1000)
m = “ ”
.判断 (数组 .进程标识符 < 10000)
m = “ ”
.默认
.判断结束
列表框1.加入项目 (到文本 (n) + k + 到文本 (数组 .进程标识符) + m + 数组 .进程名称, )
.计次循环尾 ()
.版本 2
.支持库 eAPI
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 数组, 进程信息, , "0"
.程序集变量 成员数, 整数型
.子程序 _按钮1_被单击
.局部变量 n, 整数型
.局部变量 k, 文本型, , , 进程序号和PID之间的空格数量
.局部变量 m, 文本型, , , PID和进程名之间的空格数量
数组 = 取系统进程列表 ()
成员数 = 取数组成员数 (数组)
.计次循环首 (成员数, n)
.判断开始 (n < 10)
k = “ ”
.判断 (n < 100)
k = “ ”
.判断 (n < 1000)
k = “ ”
.默认
.判断结束
.判断开始 (数组 .进程标识符 < 10)
m = “ ”
.判断 (数组 .进程标识符 < 100)
m = “ ”
.判断 (数组 .进程标识符 < 1000)
m = “ ”
.判断 (数组 .进程标识符 < 10000)
m = “ ”
.默认
.判断结束
列表框1.加入项目 (到文本 (n) + k + 到文本 (数组 .进程标识符) + m + 数组 .进程名称, )
.计次循环尾 ()
页:
[1]