实时获取通达信股票代码

stonelss

需要从通达信标准板7.6的内存中获取股票代码，大概实现方式如下，有偿加V     skystonelss


import os
import pythoncom
import pymem
import re
import time
import psutil
import win32gui# Win 图形界面接口，主要负责操作窗口切换以及窗口中元素
import win32api# Win 开发接口模块，主要负责模拟键盘和鼠标操作
import win32con# 全面的库函数，提供Win32gui和Win32api需要的操作参数
import pyWinhook
import ctypes
import win32com.client
import sys

hookmonitor = pyWinhook.HookManager()
old_code = None
Share_hwnd = None

# 读取指定应用程序中dll库的基址
def Get_moduladdr(dll, exe):    # 读DLL模块基址
    GetGameProcess = pymem.Pymem(exe)
    modules = list(GetGameProcess.list_modules())    # 列出exe的全部DLL模块
    for module in modules:
        if module.name == dll:
            # print(module.name) # 模块名字
            # print(module.lpBaseOfDll) # 模块基址
            # print("找到了")
            Moduladdr = module.lpBaseOfDll
    return GetGameProcess, Moduladdr

def get_tdx_add_code(OffsetAdd):
    try:
        Proc, BaseAdd = Get_moduladdr("Viewthem.dll", "tdxw.exe")#D:\\股票交易\\交易软件\\通达信764\\
        ptr = Proc.read_int(BaseAdd+OffsetAdd)
        print("股票代码指针："+hex(ptr))
        data = Proc.read_bytes(ptr, 6)
        Stock_code1 = data.decode('utf-8')
        strlist = list(Stock_code1)
        Stock_code = "".join(strlist)
    except Exception as e:
        print("")
    # print("无法取通达信的代码,检查通达信是否打开")
    return Stock_code

# 获取开心果版股票代码
def get_tdx_kxg_code():
    try:
        # 获取开心果6月版股票代码
        Stock_code=get_tdx_add_code(0x1585B4)
    except Exception as e:
        # 获取开心果7月版股票代码
        try:
            Stock_code=get_tdx_add_code(0x000366D0)
            # print("应用程序无法取通达信6的代码,检查通达信是否打开")
            # hookmonitor.UnhookKeyboard()#取消键盘钩子
            # hookmonitor.UnhookMouse()#取消鼠标钩子
        except Exception as e:
            print("通达信开心果7代码读取失败")
        else:
            print("读取通达信7代码成功！")
    else:
        print("读取通达信代码成功！")
        return Stock_code


if __name__ == '__main__':
    print(get_tdx_kxg_code())

尛龍科技

这也不是直接读取进程模块就行的吧，你得有偏移吧

stonelss

尛龍科技 发表于 2025-7-19 14:27
这也不是直接读取进程模块就行的吧，你得有偏移吧

搞不懂，代码不完整，获取不到

2224848

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
进程句柄	整数型
通达信进程ID	整数型
Viewthemjz	整数型
股票代码	文本型

' 声明内存读取相关API

DLL命令名	返回值类型	公开	备 注
打开进程	整数型
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
OpenProcess
参数名	类 型	传址	数组	备 注
访问权限	整数型			0x1F0FFF  ' 完全访问权限
继承句柄	逻辑型			假
进程ID	整数型

DLL命令名	返回值类型	公开	备 注
关闭句柄	逻辑型
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
CloseHandle
参数名	类 型	传址	数组	备 注
对象句柄	整数型

DLL命令名	返回值类型	公开	备 注
读内存整数	逻辑型
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
ReadProcessMemory
参数名	类 型	传址	数组	备 注
进程句柄	整数型
内存地址	整数型
缓冲区	整数型
数据长度	整数型			4
实际读取长度	整数型

DLL命令名	返回值类型	公开	备 注
读内存字节集	逻辑型
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
ReadProcessMemory
参数名	类 型	传址	数组	备 注
进程句柄	整数型
内存地址	整数型
缓冲区	字节集
数据长度	整数型
实际读取长度	整数型

子程序名	返回值类型	公开	备 注
_启动窗口_创建完毕

时钟1.时钟周期 = 1000  ' 每秒读取一次

子程序名	返回值类型	公开	备 注
取通达信进程ID	整数型

.局部变量 进程列表, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 进程信息, 进程信息结构

进程列表 = 进程_取列表 ()
计次循环首 (取数组成员数 (进程列表), i)
进程信息 = 进程_取信息 (进程列表 [i])
如果 (进程信息.进程名 = "tdxw.exe")
返回 (进程信息.进程ID)

计次循环尾 ()
返回 (0)

子程序名	返回值类型	公开	备 注
取模块jz	整数型
参数名	类 型	参考	可空	数组	备 注
目标进程ID	整数型
模块名	文本型

.局部变量 模块列表, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 模块信息, 模块信息结构

模块列表 = 进程_取模块列表 (目标进程ID)
计次循环首 (取数组成员数 (模块列表), i)
模块信息 = 进程_取模块信息 (目标进程ID, 模块列表 [i])
如果 (模块信息.模块名 = 模块名)
返回 (模块信息.jz)

计次循环尾 ()
返回 (0)

子程序名	返回值类型	公开	备 注
读取股票代码	文本型
参数名	类 型	参考	可空	数组	备 注
偏移量	整数型

.局部变量 指针地址, 整数型
.局部变量 实际读取, 整数型
.局部变量 代码字节集, 字节集
.局部变量 临时代码, 文本型

' 读取指针地址
如果 (读内存整数 (进程句柄, Viewthemjz + 偏移量, 指针地址, 4, 实际读取) ＝ 假)
返回 ("")

' 读取6字节股票代码
代码字节集.取空白字节集 (6)
如果 (读内存字节集 (进程句柄, 指针地址, 代码字节集, 6, 实际读取) ＝ 假)
返回 ("")

' 转换为文本
临时代码 = 到文本 (代码字节集)
' 过滤空字符
临时代码 = 子文本替换 (临时代码, #空字符, , , , 真)
返回 (临时代码)

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

.局部变量 尝试偏移1, 整数型
.局部变量 尝试偏移2, 整数型

尝试偏移1 = 0x1585B4  ' 开心果6月版偏移
尝试偏移2 = 0x000366D0  ' 开心果7月版偏移

' 获取通达信进程ID
通达信进程ID = 取通达信进程ID ()
如果 (通达信进程ID ＝ 0)
标签1.标题 = "未找到通达信进程 (tdxw.exe)"
返回 ()

' 打开进程
进程句柄 = 打开进程 (0x1F0FFF, 假, 通达信进程ID)
如果 (进程句柄 ＝ 0)
标签1.标题 = "无法打开通达信进程 (需管理员权限)"
返回 ()

' 获取Viewthem.dlljz
Viewthemjz = 取模块jz (通达信进程ID, "Viewthem.dll")
如果 (Viewthemjz ＝ 0)
标签1.标题 = "未找到Viewthem.dll模块"
关闭句柄 (进程句柄)
返回 ()

' 尝试读取股票代码
股票代码 = 读取股票代码 (尝试偏移1)
如果 (股票代码 ＝ "" 或 取文本长度 (股票代码) ＜ 6)
' 尝试第二个偏移量
股票代码 = 读取股票代码 (尝试偏移2)

' 显示结果
如果 (股票代码 ≠ "" 且 取文本长度 (股票代码) ＝ 6)
标签1.标题 = "当前股票代码: " + 股票代码
标签1.标题 = "未读取到有效股票代码"

' 关闭进程句柄
关闭句柄 (进程句柄)

子程序名	返回值类型	公开	备 注
_按钮手动读取_被单击

_时钟1_周期事件 ()  ' 手动触发一次读取

i支持库列表	支持库注释
精易, eAPI, spec	(未知支持库)

.版本 2<br /> .支持库 精易, eAPI, spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 进程句柄, 整数型<br /> .程序集变量 通达信进程ID, 整数型<br /> .程序集变量 Viewthemjz, 整数型<br /> .程序集变量 股票代码, 文本型<br /> <br /> ' 声明内存读取相关API<br /> .DLL命令 打开进程, 整数型, "kernel32.dll", "OpenProcess"<br />     .参数 访问权限, 整数型, , 0x1F0FFF  ' 完全访问权限<br />     .参数 继承句柄, 逻辑型, , 假<br />     .参数 进程ID, 整数型<br /> <br /> .DLL命令 关闭句柄, 逻辑型, "kernel32.dll", "CloseHandle"<br />     .参数 对象句柄, 整数型<br /> <br /> .DLL命令 读内存整数, 逻辑型, "kernel32.dll", "ReadProcessMemory"<br />     .参数 进程句柄, 整数型<br />     .参数 内存地址, 整数型<br />     .参数 缓冲区, 整数型, 传址<br />     .参数 数据长度, 整数型, , 4<br />     .参数 实际读取长度, 整数型, 传址<br /> <br /> .DLL命令 读内存字节集, 逻辑型, "kernel32.dll", "ReadProcessMemory"<br />     .参数 进程句柄, 整数型<br />     .参数 内存地址, 整数型<br />     .参数 缓冲区, 字节集, 传址<br />     .参数 数据长度, 整数型<br />     .参数 实际读取长度, 整数型, 传址<br /> <br /> .子程序 _启动窗口_创建完毕<br />     时钟1.时钟周期 = 1000  ' 每秒读取一次<br /> <br /> .子程序 取通达信进程ID, 整数型<br />     .局部变量 进程列表, 文本型, , "0"<br />     .局部变量 i, 整数型<br />     .局部变量 进程信息, 进程信息结构<br />     <br />     进程列表 = 进程_取列表 ()<br />     .计次循环首 (取数组成员数 (进程列表), i)<br />         进程信息 = 进程_取信息 (进程列表 <i>)<br />         .如果 (进程信息.进程名 = "tdxw.exe")<br />             返回 (进程信息.进程ID)<br />         .如果结束<br />     .计次循环尾 ()<br />     返回 (0)<br /> <br /> .子程序 取模块jz, 整数型<br /> .参数 目标进程ID, 整数型<br /> .参数 模块名, 文本型<br />     .局部变量 模块列表, 文本型, , "0"<br />     .局部变量 i, 整数型<br />     .局部变量 模块信息, 模块信息结构<br />     <br />     模块列表 = 进程_取模块列表 (目标进程ID)<br />     .计次循环首 (取数组成员数 (模块列表), i)<br />         模块信息 = 进程_取模块信息 (目标进程ID, 模块列表 <i>)<br />         .如果 (模块信息.模块名 = 模块名)<br />             返回 (模块信息.jz)<br />         .如果结束<br />     .计次循环尾 ()<br />     返回 (0)<br /> <br /> .子程序 读取股票代码, 文本型<br /> .参数 偏移量, 整数型<br />     .局部变量 指针地址, 整数型<br />     .局部变量 实际读取, 整数型<br />     .局部变量 代码字节集, 字节集<br />     .局部变量 临时代码, 文本型<br />     <br />     ' 读取指针地址<br />     .如果 (读内存整数 (进程句柄, Viewthemjz + 偏移量, 指针地址, 4, 实际读取) ＝ 假)<br />         返回 ("")<br />     .如果结束<br />     <br />     ' 读取6字节股票代码<br />     代码字节集.取空白字节集 (6)<br />     .如果 (读内存字节集 (进程句柄, 指针地址, 代码字节集, 6, 实际读取) ＝ 假)<br />         返回 ("")<br />     .如果结束<br />     <br />     ' 转换为文本<br />     临时代码 = 到文本 (代码字节集)<br />     ' 过滤空字符<br />     临时代码 = 子文本替换 (临时代码, #空字符, , , , 真)<br />     返回 (临时代码)<br /> <br /> .子程序 _时钟1_周期事件<br />     .局部变量 尝试偏移1, 整数型<br />     .局部变量 尝试偏移2, 整数型<br />     <br />     尝试偏移1 = 0x1585B4  ' 开心果6月版偏移<br />     尝试偏移2 = 0x000366D0  ' 开心果7月版偏移<br />     <br />     ' 获取通达信进程ID<br />     通达信进程ID = 取通达信进程ID ()<br />     .如果 (通达信进程ID ＝ 0)<br />         标签1.标题 = "未找到通达信进程(tdxw.exe)"<br />         返回 ()<br />     .如果结束<br />     <br />     ' 打开进程<br />     进程句柄 = 打开进程 (0x1F0FFF, 假, 通达信进程ID)<br />     .如果 (进程句柄 ＝ 0)<br />         标签1.标题 = "无法打开通达信进程(需管理员权限)"<br />         返回 ()<br />     .如果结束<br />     <br />     ' 获取Viewthem.dlljz<br />     Viewthemjz = 取模块jz (通达信进程ID, "Viewthem.dll")<br />     .如果 (Viewthemjz ＝ 0)<br />         标签1.标题 = "未找到Viewthem.dll模块"<br />         关闭句柄 (进程句柄)<br />         返回 ()<br />     .如果结束<br />     <br />     ' 尝试读取股票代码<br />     股票代码 = 读取股票代码 (尝试偏移1)<br />     .如果 (股票代码 ＝ "" 或 取文本长度 (股票代码) ＜ 6)<br />         ' 尝试第二个偏移量<br />         股票代码 = 读取股票代码 (尝试偏移2)<br />     .如果结束<br />     <br />     ' 显示结果<br />     .如果 (股票代码 ≠ "" 且 取文本长度 (股票代码) ＝ 6)<br />         标签1.标题 = "当前股票代码: " + 股票代码<br />     .否则<br />         标签1.标题 = "未读取到有效股票代码"<br />     .如果结束<br />     <br />     ' 关闭进程句柄<br />     关闭句柄 (进程句柄)<br /> <br /> .子程序 _按钮手动读取_被单击<br />     _时钟1_周期事件 ()  ' 手动触发一次读取