易语言读内存文本源码（易语言 读内存）
本文目录一览：
- 1、求易语言读txt内容的源码
- 2、关于易语言的读内存与写内存的代码问题~
- 3、易语言读内存的代码问题
- 4、如何用易语言输出读内存文本型？
- 5、易语言怎么读内存地址中的文本?
- 6、易语言怎样调用api读取内存的内容
求易语言读txt内容的源码
不用计次……然后把_按钮1_被单击换成时钟就好了……
.程序集 窗口程序集1
.程序集变量 文件号
.子程序 _启动子程序, 整数型
载入 (窗口1, , 真)
返回 (-1)
.子程序 _窗口1_创建完毕
通用对话框1.过滤器 ＝ "文本文档|*.txt"'只允许txt文件
通用对话框1.初始目录 ＝ 取运行目录 ()
通用对话框1.打开 ()
.如果真 (通用对话框1.文件名 ＝ 字符 (0))'是否未选择
结束 ()
.如果真结束
文件号 ＝ 打开文件 (通用对话框1.文件名, , )
_按钮1_被单击 ()
.子程序 _按钮1_被单击
.局部变量 F, 文本型
F ＝ 读入一行 (文件号)
.如果真 (F ≠ 字符 (0))
编辑框1.内容 ＝ F
置剪辑板文本 (F)'呵呵……
返回 ()
.如果真结束
信息框 ("已经到最后了，重新到最前", 0, )
移到文件首 (文件号)
_按钮1_被单击 ()'刷新
关于易语言的读内存与写内存的代码问题~
需要我可以给你！
模块名称：内存操作类
作者：小烦
版本：1.0
------------------------------
.版本 2
.程序集 内存操作, , 公开
.子程序 创建进程, 逻辑型, 公开, 从文件创建进程,成功后可直接进行本类其它操作,本类原操作句柄会自动释放
.参数 程序目录, 文本型, , 欲创建进程的执行路径
.参数 命令行, 文本型, 可空
.子程序 创建内存, 整数型, 公开, 在目标进程中创建内存空间(成功返回内存指针地址,失败返回0)
.参数 数据长度, 整数型, , 分配的数据长度
.子程序 打开窗口进程, 逻辑型, 公开, 通过窗口对象来打开进程,成功后可直接进行本类其它操作,本类原操作句柄会自动释放
.参数 窗口句柄, 整数型
.子程序 打开进程, 逻辑型, 公开, 通过进程ID来打开进程,成功后可直接进行本类其它操作,本类原操作句柄会自动释放
.参数 进程ID, 整数型, 可空, 如果为空则打开当前进程
.子程序 读取, 字节集, 公开, 读取内存中数据(返回字节集,失败返回空字节集)
.参数 地址, 整数型, , 内存指针地址
.参数 长度, 整数型, 可空, 读取的长度,读取文本型可留空,字节型1,短整数型2,整数型4,长整数型8
.子程序 读文本, 文本型, 公开, 从内存中读取文本(返回文本,失败返回空“”)
.参数 内存地址, 整数型
.子程序 读整数, 整数型, 公开, 从内存中读取整数型数据,失败返回-1
.参数 内存地址, 整数型
.子程序 关闭进程, 逻辑型, 公开, "创建进程"或"打开进程"后,不再需要进行内存等操作时,"关闭进程",该命令会在本类销毁时自动被调用
.子程序 结束进程, 逻辑型, 公开, 结束已经打开或创建的进程
.子程序 取操作句柄, 整数型, 公开, 取出已打开的进程句柄
.子程序 是否有效地址, 逻辑型, 公开, 判断进程中指定内存地址的有效性!(成功返回真,失败返回假)
.参数 地址, 整数型
.子程序 释放内存, , 公开, 在目标进程中释放内存空间
.参数 地址, 整数型
.子程序 搜索, 整数型, 公开, 进行内存搜索(返回结果数目,失败或没有返回0)
.参数 搜索内容, 字节集, , 欲搜索的内容 其他类型-需自行转换为字节集类型
.参数 结果地址, 整数型, 数组, 用来保存搜索的结果
.参数 回调进度, 子程序指针, 可空, 回调进度(进度值%) 如果有返回值返回真则停止搜索
.子程序 提升权限, 逻辑型, 公开, 提升自进程到调试级权限
.子程序 线程注入, 逻辑型, 公开, 通过创建远程线程方式注入DLL到指定进程中(成功返回真,失败返回假)
.参数 DLL文件名, 文本型, , 欲注入的DLL名称
.子程序 写入, 逻辑型, 公开, 向内存中写入数据
.参数 地址, 整数型, , 内存指针地址
.参数 数据, 字节集, , 欲写入的数据
.参数 长度, 整数型, 可空, 欲写入长度,默认为数据长度
.子程序 写文本, 逻辑型, 公开, 往内存中写入文本(成功返回真,失败返回假)
.参数 地址, 整数型, , 内存地址
.参数 内容, 文本型, , 欲写入的文本
.子程序 写整数, 逻辑型, 公开, 往内存中写入整数(成功返回真,失败返回假)
.参数 地址, 整数型, , 内存地址
.参数 整数, 整数型, , 欲写入的整数
.子程序 再次搜索, 整数型, 公开, 在已经搜索过的情况下进行再一次搜索(返回结果数目,失败或没有返回0)
.参数 搜索内容, 字节集, , 欲搜索的内容 其他类型-需自行转换为字节集类型
.参数 结果地址, 整数型, 数组, 用来保存搜索的结果
.参数 回调进度, 子程序指针, 可空, 回调进度(进度值%) 如果有返回值返回真则停止搜索
.子程序 置已有进程, , 公开, 设置一个已经打开的进程,然后可直接进行本类其它操作,本类原操作句柄会自动释放
.参数 进程句柄, 整数型
易语言读内存的代码问题
.版本 2
.程序集 窗口程序集1
.程序集变量 a
.程序集变量 b
.程序集变量 进程ID
.子程序 _时钟1_周期事件
a ＝ 读内存整数型 (进程ID, 十六到十 (“00A1E0C4”), -1)'这个是基址
b ＝ 读内存整数型 (进程ID, a ＋ 十六到十 (“24C”), -1)'注意24C是偏移
标签1.标题 ＝ 到文本 (b)
.子程序 __启动窗口_创建完毕
进程ID ＝ 进程取ID (“Game.exe”)
分给我吧!
如何用易语言输出读内存文本型？
基址=读内存文本型 (进程ID, 基址)+一级偏移
基址=读内存文本型 (进程ID, 基址)+二级偏移
基址=读内存文本型 (进程ID, 基址)+角色偏移
标签1.标题 ＝ 读内存文本型 (进程ID, 基址）
试试这样
易语言怎么读内存地址中的文本?
.DLL命令 X_内存_读文本型, 逻辑型, "kernel32.dll", "ReadProcessMemory", 公开
.参数 进程句柄, 整数型
.参数 读取地址, 整数型
.参数 保存数值, 文本型, 传址
.参数 读取长度, 整数型.参数 实读长度, 整数型, 传址
易语言怎样调用api读取内存的内容
.版本 2
.DLL命令 取进程线程标识符_, 整数型, "user32.dll", "GetWindowThreadProcessId", , GetWindowThreadProcessId，获取与指定窗口关联在一起的一个线程和进程标识符
.参数 窗口句柄, 整数型, , hwnd，指定窗口句柄
.参数 进程标识符, 整数型, 传址, lpdwProcessId，指定一个变量，用于装载拥有那个窗口的一个进程的标识符
.DLL命令 寻找顶级窗口_, 整数型, "user32.dll", "FindWindowA", , FindWindow,寻找窗口列表中第一个符合指定条件的顶级窗口
.参数 窗口类名, 文本型, , lpClassName，参见相关帮助
.参数 窗口文本, 整数型, , lpWindowName，参见相关帮助
.DLL命令 OpenProcess, 整数型, , , , 打开进程
.参数 dwDesiredAccess, 整数型
.参数 bInheritHandle, 整数型
.参数 dwProcessId, 整数型
.DLL命令 CloseHandle, 逻辑型, , "CloseHandle", , 关闭进程
.参数 hObject, 整数型
.DLL命令 _读字节集内存, 整数型, , "ReadProcessMemory"
.参数 hProcess, 整数型
.参数 lpBaseAddress, 整数型
.参数 lpBuffer, 字节集, 传址
.参数 nSize, 整数型
.参数 lpNumberOfBytesWritten, 整数型
.DLL命令 _读整型内存, 整数型, , "ReadProcessMemory"
.参数 hProcess, 整数型
.参数 lpBaseAddress, 整数型, , 内存地址
.参数 lpBuffer, 整数型, 传址, 数据指针
.参数 nSize, 整数型, , 长度
.参数 lpNumberOfBytesWritten, 整数型, , 实际写出长度
.常量 PROCESS_ALL_ACCESS, "2035711", , 内存操作
.版本 2
.子程序 读文本内存, 文本型, 公开, 读取文本型数据(返回文本 失败返回空文本)
.参数 内存地址, 整数型
.参数 长度, 整数型, 可空, 默认为20 欲读取的长度字节
.局部变量 临时字节集, 字节集
.局部变量 操作句柄, 整数型
.如果真 (长度 ＝ 0)
长度 ＝ 20
.如果真结束
' --读文本---------------------------------
临时字节集 ＝ 取空白字节集 (20)
操作句柄 ＝ OpenProcess (#PROCESS_ALL_ACCESS, 0, PID) ' 取得操作句柄
_读字节集内存 (操作句柄, 内存地址, 临时字节集, 长度, 0)
CloseHandle (操作句柄)
返回 (到文本 (临时字节集))
.子程序 读整型内存, 长整数型, 公开, 读取整数型数据(返回整数内容 失败返回0) [斩月]
.参数 内存地址, 整数型
.参数 是否长整数, 逻辑型, 可空, 默认为假:读取整数型 真:读取长整数型
.局部变量 临时整数, 整数型
.局部变量 长度, 整数型
.局部变量 操作句柄, 整数型
.如果 (是否长整数)
长度 ＝ 8
.否则
长度 ＝ 4
.如果结束
' ---读整数----------------------------------
操作句柄 ＝ OpenProcess (#PROCESS_ALL_ACCESS, 0, PID) ' 取得操作句柄
_读整型内存 (操作句柄, 内存地址, 临时整数, 长度, 0)
CloseHandle (操作句柄)
返回 (临时整数)
.子程序 读字节集内存, 字节集, 公开, 读取字节集数据(返回字节集 失败返回空) [斩月]
.参数 地址, 整数型, , 内存地址
.参数 长度, 整数型, , 欲读长度
.局部变量 变量, 字节集, , , 保存读取数据的变量
.局部变量 操作句柄, 整数型
变量 ＝ 取空白字节集_ (长度)
操作句柄 ＝ OpenProcess (#PROCESS_ALL_ACCESS, 0, PID) ' 取得操作句柄
_读字节集内存 (操作句柄, 地址, 变量, 长度, 0)
CloseHandle (操作句柄)
返回 (变量)
.版本 2
.子程序 取空白字节集_, 字节集, , 返回具有特定数目 0 字节的字节集 [斩月]
.参数 零字节数目, 整数型
.局部变量 空白字节集, 字节集
.计次循环首 (零字节数目, )
空白字节集 ＝ 空白字节集 ＋ { 0 }
.计次循环尾 ()
返回 (空白字节集)
.版本 2
.子程序 取窗口PID, 整数型, 公开, 0就是失败了。。
.参数 窗口类名, 文本型, , 窗口类名
.局部变量 句柄, 整数型
.局部变量 局部_PID, 整数型
句柄 ＝ 寻找顶级窗口_ (窗口类名, 0)
.如果真 (句柄 ≠ 0)
取进程线程标识符_ (句柄, 局部_PID)
.如果真结束
PID ＝ 局部_PID '原变量来自模块全局变量
返回 (局部_PID)
.版本 2
.子程序 十六到十, 长整数型, 公开, 将十六进制转换成十进制(返回十进制文本)
.参数 十六进制文本, 文本型, , 待转换的十六进制文本
.局部变量 中间文本, 文本型
.局部变量 结果, 长整数型
.局部变量 局部计次, 整数型
.变量循环首 (1, 取文本长度 (十六进制文本), 1, 局部计次)
中间文本 ＝ 取文本中间 (十六进制文本, 局部计次, 1)
结果 ＝ (寻找文本 (“0123456789ABCDEF”, 中间文本, , 真) － 1) × 求次方 (16, 取文本长度 (十六进制文本) － 局部计次) ＋ 结果
.变量循环尾 ()
返回 (结果)
=========================================
1.偏移要通过OD或者其他软件自己找
2.十六进制转十进制也附上了..
天啊..... 这么多代码就值 5分啊啊啊 ..... 给我加分....
