TC官方合作论坛

标题: 求教 怎么获取电脑登录的QQ号 [打印本页]

作者: hyk18084817253    时间: 2017-10-8 11:06
标题: 求教 怎么获取电脑登录的QQ号
    dm = 插件("dm.dmsoft")
    变量 句柄=窗口查找("QQ")
    变量 QQ = dm.ReadInt(句柄,"<KernelUtil.dll>+168DBC",0)
我是这样通过找内存来识别的  但是QQ版本不同的话就识别不了了
论坛找到一个获取QQ的  但是我的TC是7.0 打不开他那个
有大神说下思路吗


作者: hyk18084817253    时间: 2017-10-8 11:56
空间 腾讯快读登录

Size=0
Data=array[][3]

功能 开始_点击()
    if(!help.isregister("SSOAxCtrlForPTLogin.SSOForPTLogin2"))
        help.confirmationbox("您的电脑未安装TX快捷登陆插件...","错误",0,true)
        help.exit()
    endif
    ret=dllcall(help.getrcpath("rc:test.dll"),"char *","getkeys")
    if(ret=="")
        help.confirmationbox("可能的原因:\n1、您未登录QQ.\n2、您的QQ已经离线或锁定.\n3、网络状态异常!","失败",0,true)
        return 0
    endif
    list.deleteall("QQ")
    keys=array[]
    str.split(ret,";",keys)
    size
    arraysp.size(keys,size)
    data,tmp
    for(i=0;i<size;i++)
        str.split(keys[i],"|",data)
        arraysp.size(data,tmp)
        if(tmp>2)
            //数组重定义未赋值误区
            Data=arraysp.alloc(Data,true,Size+1,3)
            Data[Size][0]=data[0]
            Data[Size][1]=data[1]
            Data[Size][2]=data[2]
            //list.addstring("QQ",data[0])
            Size++
            list.addstring("QQ",data[0])
        endif
    endfor
功能结束

功能 退出_点击()
    辅助.退出()
功能结束

功能 QQ_选择改变()
    label=list.getcursel("QQ")
    if(label==-1)
        return 0
    endif
    if(label<Size)
        statictext.settext("Name",Data[label][1])
        edit.settext("ClientKey",Data[label][2])
        return 1
    endif
功能结束

空间结束


有么有好心人帮忙翻译成7.0的   有偿
作者: 武昌剩竹    时间: 2017-10-9 12:14
http://bbs.tyuyan.net/thread-69243-1-1.html
作者: 1685764683    时间: 2017-11-8 18:59
hyk18084817253 发表于 2017-10-8 11:56
空间 腾讯快读登录

Size=0

谢谢




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1