求教 怎么获取电脑登录的QQ号

hyk18084817253

    dm = 插件("dm.dmsoft")
    变量 句柄=窗口查找("QQ")
    变量 QQ = dm.ReadInt(句柄,"<KernelUtil.dll>+168DBC",0)
我是这样通过找内存来识别的  但是QQ版本不同的话就识别不了了
论坛找到一个获取QQ的  但是我的TC是7.0 打不开他那个
有大神说下思路吗

hyk18084817253

空间 腾讯快读登录

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的   有偿

武昌剩竹

http://bbs.tyuyan.net/thread-69243-1-1.html

1685764683

hyk18084817253 发表于 2017-10-8 11:56
空间 腾讯快读登录

Size=0

谢谢