易语言加速清理内存源码
系统结构:绘制,memory,Optimize_memory,Optimize_memory_all,创建_,销毁_,刷新显示_,OpenProcess,SetProcessWorkingSetSize,CloseHandle,CreateToolhelp32Snapshot,Process32First,Process32Next,取全局内存状态_,GetDC,CreateCompatibleDC,SelectObject,CreateBitmap,ReleaseDC,删除对象_,DeleteDC,UpdateLayeredWindow,SetWindowLongA,GetWindowLong,
======窗口程序集1
| |
| |------ __启动窗口_创建完毕
| |
| |------ __启动窗口_位置被改变
| |
| |------ __启动窗口_尺寸被改变
| |
| |------ 绘制
| |
| |------ _时钟1_周期事件
| |
| |------ __启动窗口_被双击
| |
| |
======core
| |
| |------ memory
| |
| |------ Optimize_memory
| |
| |------ Optimize_memory_all
| |
| |
======Apparent
| |
| |------ 创建_
| |
| |------ 销毁_
| |
| |------ 刷新显示_
| |
| |
======调用的Dll
| |
| |---[dll]------ OpenProcess
| |
| |---[dll]------ SetProcessWorkingSetSize
| |
| |---[dll]------ CloseHandle
| |
| |---[dll]------ CreateToolhelp32Snapshot
| |
| |---[dll]------ Process32First
| |
| |---[dll]------ Process32Next
| |
| |---[dll]------ 取全局内存状态_
| |
| |---[dll]------ GetDC
| |
| |---[dll]------ CreateCompatibleDC
| |
| |---[dll]------ SelectObject
| |
| |---[dll]------ CreateBitmap
| |
| |---[dll]------ ReleaseDC
| |
| |---[dll]------ 删除对象_
| |
| |---[dll]------ DeleteDC
| |
| |---[dll]------ UpdateLayeredWindow
| |
| |---[dll]------ SetWindowLongA
| |
| |---[dll]------ GetWindowLong
调用的DLL命令:
.DLL命令 OpenProcess, 整数型, "Kernel32.dll", "OpenProcess"
.参数 dwDesiredAccess, 整数型
.参数 bInheritHandle, 整数型
.参数 dwProcessId, 整数型
.DLL命令 SetProcessWorkingSetSize, 整数型, "kernel32.dll", "SetProcessWorkingSetSize"
.参数 HANDLE
.参数 SIZE_T
.参数 SIZE_T
.DLL命令 CloseHandle, 整数型, "kernel32.dll", "CloseHandle"
.参数 HANDLE, 整数型
.DLL命令 CreateToolhelp32Snapshot, 整数型, "Kernel32.dll", "CreateToolhelp32Snapshot"
.参数 dwFlags, 整数型
.参数 th32ProcessID, 整数型
.DLL命令 Process32First, 整数型, "Kernel32.dll", "Process32First"
.参数 HANDLE, 整数型
.参数 LPPROCESSENTRY32, PROCESSENTRY32
.DLL命令 Process32Next, 整数型, "Kernel32.dll", "Process32Next"
.参数 HANDLE, 整数型
.参数 LPPROCESSENTRY32, PROCESSENTRY32
.DLL命令 取全局内存状态_, 整数型, "kernel32", "GlobalMemoryStatus", , $(b)
.参数 缓冲区结构, 内存状态_, , lpBuffer
.DLL命令 GetDC, 整数型, "user32", "GetDC", 公开, 获取指定窗口的设备场景 指定窗口的设备场景句柄,出错则为0
.参数 hwnd, 整数型, , 将获取其设备场景的窗口的句柄。若为0,则要获取整个屏幕的DC;
.DLL命令 CreateCompatibleDC, 整数型, "gdi32", "CreateCompatibleDC", 公开, 创建一个与特定设备场景一致的内存设备场景 新设备场景句柄,若出错则为零
.参数 设备场景句柄, 整数型, , 设备场景句柄。新的设备场景将与它一致。也可能为0以创建一个与屏幕一致的设备场景;
.DLL命令 SelectObject, 整数型, "gdi32", "SelectObject", 公开, 每个设备场景都可能有选入其中的图形对象。其中包括位图、刷子、字体、画笔以及区域等等。一次选入设备场景的只能有一个对象。选定的对象会在设备场景的绘图操作中使用。例如,当前选定的画笔决定了在设备场景中描绘的线段颜色及样式 与以前选入设备场景的相同hObject类型的一个对象的句柄,零表示出错。如选定的对象是一个区域(Region),结果就是下列常数之一:SIMPLEREGION, ; COMPLEXREGION 或 NULLREGION 对区域进行描述, GDI_ERROR 表示出错
.参数 设备场景句柄, 整数型, , 一个设备场景的句柄
.参数 对象句柄, 整数型, , 一个画笔、位图、刷子、字体或区域的句柄;
.DLL命令 CreateBitmap, 整数型, "gdi32", "CreateBitmap", 公开, 按照规定的格式创建一幅与设备有关位图 执行成功返回位图的句柄,零表示失败
.参数 位图宽度, 整数型, , 位图宽度,以像素为单位
.参数 位图高度, 整数型, , 位图高度,以像素为单位
.参数 色层数量, 整数型, , 色层数量
.参数 像素位数, 整数型, , 每像素的位数
.参数 初始化处理, 整数型, , 指向欲载入位图的数据的指针。可设为零,表示不对位图进行初始化(用ByVal传递一个零值)。这个数据的格式必须与设备的要求相符。扫描线必须对齐16位字边界;
.DLL命令 ReleaseDC, 整数型, "user32", "ReleaseDC", 公开, 释放由调用GetDC或GetWindowDC函数获取的指定设备场景。它对类或私有设备场景无效(但这样的调用不会造成损害) 执行成功为1,否则为0
.参数 窗口句柄, 整数型, , 要释放的设备场景相关的窗口句柄
.参数 设备场景, 整数型, , 要释放的设备场景句柄;
.DLL命令 删除对象_, 整数型, "gdi32.dll", "DeleteObject", , , DeleteObject
.参数 对象句柄, 整数型, , hObject,一个GDI对象的句柄
.DLL命令 DeleteDC, 整数型, "gdi32", "DeleteDC", 公开, 删除专用设备场景或信息场景,释放所有相关窗口资源。不要将它用于GetDC函数取回的设备场景 执行成功则为非零,失败则为零
.参数 设备场景句柄, 整数型, , 将要删除的设备场景 在vb里使用不要将它用于由vb hdc属性获取的设备场景句柄;
.DLL命令 UpdateLayeredWindow, 逻辑型, "user32.dll"
.参数 hwnd, 整数型
.参数 hdcDst, 整数型
.参数 pptDst, POINT
.参数 psize, SIZE
.参数 hdcSrc, 整数型
.参数 pptSrc, POINT
.参数 crKey, 整数型
.参数 pblend, BLENDFUNCTION
.参数 dwFlags, 整数型
.DLL命令 SetWindowLongA, 整数型, "user32", "SetWindowLongA", 公开, 在窗口结构中为指定的窗口设置信息 指定数据的前一个值
.参数 hwnd, 整数型
.参数 nIndex, 整数型
.参数 dwNewLong, 整数型
.DLL命令 GetWindowLong, 整数型, "user32", "GetWindowLongA", 公开
.参数 窗口句柄, 整数型, , 欲为其获取信息的窗口的句柄
.参数 属性, 整数型