文件名称：内存释放.e
文件大小：6KB
文件格式：E
更新时间：2016-02-26 13:32:04
内存释放.e
内存释放.e .版本 2 .支持库 shell .程序集 窗口程序集1 .程序集变量 释放前, 整数型 .程序集变量 释放后, 整数型 .子程序 __启动窗口_创建完毕 自动释放内存 (1) 结束 () .子程序 自动释放内存, , , 0 释放自身 非0 所有进程 .参数 方式, 整数型 .局部变量 系统目录, 文本型 .局部变量 进程句柄, 整数型 .局部变量 进程快照, 整数型 .局部变量 进程信息, PROCESSENTRY32 系统目录 ＝ 取特定目录 (#Windows系统目录) 进程快照 ＝ CreateToolhelp32Snapshot (15, 0) .如果真 (进程快照 ＝ 0) 返回 () ' 本源码来自易语言资源网(www.5A5X.com) .如果真结束 进程信息.dwSize ＝ 296 ' = len (uProcess) 进程句柄 ＝ Process32First (进程快照, 进程信息) .判断循环首 (进程句柄 ≠ 0) .判断开始 (方式 ＝ 0 且 到文本 (进程信息.szExeFile) ＝ 取执行文件名 ()) ' 输出调试文本 (到文本 (进程信息.th32ProcessID) ＋ “ ” ＋ 到文本 (进程信息.dwSize) ＋ “ ” ＋ 到文本 (进程信息.dwFlags) ＋ “ ” ＋ 到文本 (进程信息.cntUsage) ＋ “ ” ＋ 到文本 (进程信息.szExeFile) ＋ “ ” ＋ 到文本 (进程信息.cntThreads) ＋ “ ” ＋ 到文本 (进程信息.th32ModuleID) ＋ “ ” ＋ 到文本 (进程信息.pcPriClassBase) ＋ “ ” ＋ 到文本 (进程信息.th32DefaultHeapID) ＋ “ ” ＋ 到文本 (进程信息.th32ParentProcessID)) 运行 (系统目录 ＋ “empty.exe ” ＋ 到文本 (进程信息.th32ProcessID), 真, #隐藏窗口) 跳出循环 () ' 本源码来自易语言资源网(www.5A5X.com) .默认 .如果真 (方式 ≠ 0) ' 输出调试文本 (到文本 (进程信息.th32ProcessID) ＋ “ ” ＋ 到文本 (进程信息.dwSize) ＋ “ ” ＋ 到文本 (进程信息.dwFlags) ＋ “ ” ＋ 到文本 (进程信息.cntUsage) ＋ “ ” ＋ 到文本 (进程信息.szExeFile) ＋ “ ” ＋ 到文本 (进程信息.cntThreads) ＋ “ ” ＋ 到文本 (进程信息.th32ModuleID) ＋ “ ” ＋ 到文本 (进程信息.pcPriClassBase) ＋ “ ” ＋ 到文本 (进程信息.th32DefaultHeapID) ＋ “ ” ＋ 到文本 (进程信息.th32ParentProcessID)) 运行 (系统目录 ＋ “empty.exe ” ＋ 到文本 (进程信息.th32ProcessID), 假, #隐藏窗口) .如果真结束 ' 本源码来自易语言资源网(www.5A5X.com) .判断结束 进程句柄 ＝ Process32Next (进程快照, 进程信息) .判断循环尾 () CloseHandle (进程快照)