[十天入门易语言]第十课任务管理器实例2_分上下两集讲完

赚金币

超级列表框1.全部删除 ()
窗口句柄 ＝ 取所有窗口列表 ()
数目 ＝ 取数组成员数 (窗口句柄)
.计次循环首 (数目, N)
    .如果真 (取窗口标题 (到整数 (窗口句柄 [N])) ≠ “” 且 取窗口标题 (到整数 (窗口句柄 [N])) ≠ “Program Manager” 且 取窗口标题 (到整数 (窗口句柄 [N])) ≠ “开始”)
        超级列表框1.插入表项 (0, 窗口句柄 [N], , , , 0)
        超级列表框1.置标题 (0, 1, 取窗口标题 (到整数 (窗口句柄 [N])))
        窗口数目 ＝ 窗口数目 ＋ 1
    .如果真结束
.计次循环尾 ()
_启动窗口.标题 ＝ “当前共运行” ＋ 到文本 (窗口数目) ＋ “个窗口...”

.子程序 _超级列表框1_被双击, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
.局部变量 被选择, 整数型, , "0"

被选择 ＝ 超级列表框1.取被选择表项 ()
终止进程 (超级列表框1.取标题 (被选择 [1], 1))
_按钮1_被单击 ()

《十天入门易语言》的10课 结束