API创建窗口略缩图非截图方式的进程查看器

窗口1.标题 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 0)
变量_句柄 ＝ FindWindowEx (到整数 (超级列表框1.取标题 (超级列表框1.现行选中项, 2)), 0, 0, 0)
窗口1.超级列表框1.全部删除 ()
输出调试文本 (变量_句柄)
.判断循环首 (变量_句柄 ≠ 0)
变量_类名 ＝ 取空白文本 (255)
变量_标题 ＝ 取空白文本 (255)
GetWindowText (变量_句柄, 变量_标题, 取文本长度 (变量_标题))
GetClassName (变量_句柄, 变量_类名, 取文本长度 (变量_类名))
表项索引 ＝ 窗口1.超级列表框1.插入表项 (, 到文本 (变量_句柄), , , , )
窗口1.超级列表框1.置标题 (表项索引, 1, 变量_类名)
窗口1.超级列表框1.置标题 (表项索引, 2, 变量_标题)
变量_句柄 ＝ FindWindowEx (到整数 (超级列表框1.取标题 (超级列表框1.现行选中项, 2)), 变量_句柄, 0, 0)
处理事件 ()
.判断循环尾 ()