|
|
超级列表框1.全部删除 ()
窗口句柄 ＝ 取所有窗口列表 ()
数目 ＝ 取数组成员数 (窗口句柄)
.计次循环首 (数目, N)
.如果真 (取窗口标题 (到整数 (窗口句柄 [N])) ≠ “” 且 取窗口标题 (到整数 (窗口句柄 [N])) ≠ “Program Manager” 且 取窗口标题 (到整数 (窗口句柄 [N])) ≠ “开始”)
超级列表框1.插入表项 (0, 窗口句柄 [N], , , , 0)
超级列表框1.置标题 (0, 1, 取窗口标题 (到整数 (窗口句柄 [N])))
窗口数目 ＝ 窗口数目 ＋ 1
.如果真结束
.计次循环尾 ()
_启动窗口.标题 ＝ “当前共运行” ＋ 到文本 (窗口数目) ＋ “个窗口...”
.子程序 _超级列表框1_被双击, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
.局部变量 被选择, 整数型, , "0"
被选择 ＝ 超级列表框1.取被选择表项 ()
终止进程 (超级列表框1.取标题 (被选择 [1], 1))
_按钮1_被单击 ()
《十天入门易语言》的10课 结束
|
-
-
下载.txt
130 Bytes, 下载次数: 18
售价: 10 金钱 [记录]
|
发表于 2018-8-12 19:10:02
