易语言内存映射类模块源码

易语言内存映射类模块源码

系统结构:创建映射,打开文件_,取颗粒数,映射内存,读基址,释放内存,关闭文件_,写入字节集,移动读写位置_,读位置指针,删除字节集,映射_创建,关闭句柄,映射_置内存,写字节集,映射_释放内存,API_读字节集内存,取低层平台信息_,api_打开文件_,GetLastError,

======程序集1
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |
======类_内存映射
| |
| |------ _初始化
| |
| |------ _销毁
| |
| |------ 创建映射
| |
| |------ 打开文件_
| |
| |------ 取颗粒数
| |
| |------ 映射内存
| |
| |------ 读基址
| |
| |------ 释放内存
| |
| |------ 关闭文件_
| |
| |------ 写入字节集
| |
| |------ 移动读写位置_
| |
| |------ 读位置指针
| |
| |------ 删除字节集
| |
| |
======窗口程序集1
| |
| |------ _窗口1_创建完毕
| |
| |------ _按钮1_被单击
| |
| |
======调用的Dll
| |
| |---[dll]------ 映射_创建
| |
| |---[dll]------ 关闭句柄
| |
| |---[dll]------ 映射_置内存
| |
| |---[dll]------ 写字节集
| |
| |---[dll]------ 映射_释放内存
| |
| |---[dll]------ API_读字节集内存
| |
| |---[dll]------ 取低层平台信息_
| |
| |---[dll]------ api_打开文件_
| |
| |---[dll]------ GetLastError

调用的DLL命令:

.DLL命令 映射_创建, 整数型, , "CreateFileMappingA"
.参数 hFile, 整数型
.参数 lpFileMappingAttributes, 整数型
.参数 flProtect, 整数型
.参数 dwMaximumSizeHigh, 整数型, , CreateFileMapping
.参数 dwMaximumSizeLow, 整数型, , 文件映射的最大长度的低32位。如这个参数和dwMaximumSizeHigh都是零，就用磁盘文件的实际长度
.参数 lpName, 文本型, , 指定文件映射对象的名字。如存在这个名字的一个映射，函数就会打开它。用vbNullString创建一个无名的文件映射

.DLL命令 关闭句柄, 逻辑型, , "CloseHandle"
.参数 hObject, 整数型

.DLL命令 映射_置内存, 整数型, "kernel32.dll", "MapViewOfFile"
.参数 hFileMappingObject, 整数型, , 返回的文件映像对象句柄
.参数 dwDesiedAccess, 整数型, , 映射对象的文件数据的访问方式，而且同样要与CreateFileMapping()函数所设置的保护属性相匹配
.参数 dwFileOffsetHigh, 整数型, , 文件中映射起点的高32位地址
.参数 dwFileOffsetLow, 整数型, , 文件中映射起点的低32位地址
.参数 dwNumberOfBytesToMap, 整数型, , 指定映射文件的字节数

.DLL命令 写字节集, 整数型, "kernel32.dll", "WriteProcessMemory"
.参数 hProcess, 整数型
.参数 内存地址, 整数型
.参数 数据指针, 字节集, 传址
.参数 长度, 整数型
.参数 实际写出长度, 整数型

.DLL命令 映射_释放内存, 整数型, "kernel32.dll", "UnmapViewOfFile"
.参数 lpBaseAddress, 整数型, , 提供内存基址

.DLL命令 API_读字节集内存, 整数型, "kernel32.dll", "ReadProcessMemory", , 非0表示成功
.参数 hProcess, 整数型, , 进程的句柄
.参数 lpBaseAddress, 整数型, , 写入进程的位置
.参数 lpBuffer, 字节集, 传址, 提供字节集变量用来存放数据当前存放的地址
.参数 nSize, 整数型, , 数据的长度
.参数 lpNumberOfBytesWritten, 整数型, , 实际数据长度

.DLL命令 取低层平台信息_, 整数型, "kernel32", "GetSystemInfo", , ,
.参数 系统信息, 系统信息_

.DLL命令 api_打开文件_, 整数型, "kernel32.dll", "OpenFile", , ,
.参数 文件名, 文本型, , lpFileName，欲打开文件的名字
.参数 文件操作结果, 文件结构信息_, 传址, lpReOpenBuff，文件操作结果
.参数 操作方式, 整数型, , wStyle，操作方式

.DLL命令 GetLastError, 整数型, , "GetLastError"