| 发表于:2007-11-23 01:27:26 楼主 |
shellEXECute(handle, 'open', pchar('d:\保存\qq2006standardkb2\qq\qq.exe'), nil, nil, sw_show);//运行qq hwnd:=findwindow(nil,pchar('qq用户登录'));//找到句柄 hedit := findwindowex(hwnd,0,'combobox',nil);//这是找到qq号码框句柄 sendmessage(hedit,wm_settext,0,integer(pchar(qq)));//这是输入qq号码句柄 hdiapass :=findwindowex(hwnd,0,'#32770',nil);//这是qq密码的句柄 hpass:=getdlgitem(hdiapass,strtoint('0x3ea6'));//这是输入qq的密码句柄 for i:= 1 to length(mm) do sendmessage(hpass,wm_char,integer(pchar(qqmima[i])),0);//这是向qq密码框里发送密码。 buton:=getdlgitem(hwnd,strtoint('0x3ea0')); sendmessage(buton,bm_click,0,0); //这是登陆qq 问题出来了,2006版qq,这样可以自动运行qq,并自动输入密码,且正常登陆。 但是2007版qq,当自动输入密码后,可以看到密码自动输入了,但是点击登陆时,密码却自动清空了,这是什么原因呢?有哪位高手知道吗? |
|
|
|
|