文件映射文本型

易语言 2020-04-08 15:12:55

文件映射文本型

.子程序 文件_读取映射对象, 文本型, 公开, 读取映射对象的值
.参数 映射名, 文本型, , 用【文件_创建映射对象】命令分创建时的映射对象名
.局部变量 局_映射句柄, 整数型
.局部变量 局_视图地址, 整数型
.局部变量 局_值, 文本型

.如果真 (局_视图地址 = 0)
局_映射句柄 = OpenFileMappingA (6, 0, 映射名)
局_视图地址 = MapViewOfFile (局_映射句柄, 6, 0, 0, 0)
.如果真结束
.如果真 (局_视图地址 = 0)
返回 (“”)
.如果真结束
局_值 = 取空白文本 (1024)
RtlMoveMemory (取变量数据地址 (局_值), 局_视图地址, 1024)
UnmapViewOfFile (局_视图地址)
调试输出 (局_值)
返回 (局_值)