您的足迹：首页 > 我的代码 >aardio版的窗口探测器Winspy，很好用的

aardio版的窗口探测器Winspy，很好用的

日期：2016-7-4 栏目： 我的代码 浏览：2471次 评论：0条 
/*  
 * 窗口探测器
 * 作者: lujjjh  
 * 备注: http://www.ecranesoft.com/bbs/showtopic-8494.aspx
 * -----------------------------
 * 修改记录
 * crane 2010/08/14
 * -----------------------------
 * $Id: winspy.aau 1259 2010-12-23 08:24:49Z crane.he $
*/

import win;
import winex;
import win.ui;
import com.picture;
import win.cur;//鼠标指针函数库
import mouse;
/*DSG{{*/
var winform = ..win.form(text="winspy for AAuto";right=392;bottom=386;parent=...)
winform.add(
button={cls="button";text="抓取密码";left=281;top=166;right=372;bottom=193;disabled=1;dl=1;dt=1;font=LOGFONT( h=-11 );z=21};
chkForeground={cls="checkbox";text="自动捕获前台窗口";left=153;top=24;right=275;bottom=39;dl=1;dt=1;font=LOGFONT( h=-11 );z=20};
chkTopMost={cls="checkbox";text="保持窗口最前";left=51;top=24;right=149;bottom=39;dl=1;dt=1;font=LOGFONT( h=-11 );z=19};
editCode={cls="edit";left=6;top=195;right=384;bottom=379;db=1;dl=1;dr=1;dt=1;edge=1;font=LOGFONT( h=-11 );hscroll=1;multiline=1;vscroll=1;z=24};
lbClass={cls="static";text="类名:";left=210;top=74;right=259;bottom=89;align="right";dl=1;dt=1;font=LOGFONT( h=-11 );transparent=1;z=4};
lbHwnd={cls="static";text="窗口句柄:";left=31;top=98;right=88;bottom=110;align="right";dl=1;dt=1;font=LOGFONT( h=-11 );transparent=1;z=1};
lbId={cls="static";text="命令ID:";left=209;top=99;right=258;bottom=114;align="right";dl=1;dt=1;font=LOGFONT( h=-11 );transparent=1;z=5};
lbParenHwnd={cls="static";text="父窗口句柄:";left=20;top=74;right=88;bottom=89;align="right";dl=1;dt=1;font=LOGFONT( h=-11 );transparent=1;z=6};
lbPid={cls="static";text="进程ID:";left=209;top=125;right=258;bottom=140;align="right";dl=1;dt=1;font=LOGFONT( h=-11 );transparent=1;z=9};
lbStyle={cls="static";text="基本样式:";left=28;top=122;right=88;bottom=142;align="right";dl=1;dt=1;font=LOGFONT( h=-11 );transparent=1;z=2};
lbStyleEx={cls="static";text="扩展样式:";left=26;top=147;right=88;bottom=162;align="right";dl=1;dt=1;font=LOGFONT( h=-11 );transparent=1;z=3};
lbText={cls="static";text="文本标题:";left=21;top=170;right=88;bottom=185;align="right";dl=1;dt=1;font=LOGFONT( h=-11 );transparent=1;z=7};
lbTid={cls="static";text="线程ID:";left=209;top=147;right=258;bottom=162;align="right";dl=1;dt=1;font=LOGFONT( h=-11 );transparent=1;z=8};
pic1={cls="picturebox";left=9;top=7;right=41;bottom=39;dl=1;dt=1;font=LOGFONT( name='SimSun';h=-11 );image=$"\res\1.gif";notify=1;transparent=1;z=23};
static={cls="static";text="执行文件:";left=25;top=51;right=88;bottom=66;align="right";dl=1;dt=1;font=LOGFONT( h=-11 );transparent=1;z=26};
staticTip={cls="static";text="← 拖动左侧图标置于目标窗口上";left=53;top=6;right=258;bottom=25;dl=1;dt=1;font=LOGFONT( h=-11 );transparent=1;z=18};
txtClass={cls="edit";left=267;top=73;right=373;bottom=94;dl=1;dt=1;edge=1;font=LOGFONT( h=-11 );readonly=1;z=14};
txtHwnd={cls="edit";left=97;top=96;right=203;bottom=117;dl=1;dt=1;edge=1;font=LOGFONT( h=-11 );readonly=1;z=11};
txtId={cls="edit";left=267;top=96;right=373;bottom=117;dl=1;dt=1;edge=1;font=LOGFONT( h=-11 );readonly=1;z=15};
txtParenHwnd={cls="static";left=97;top=73;right=203;bottom=94;color=16711680;dl=1;dt=1;edge=1;font=LOGFONT( h=-11;name='Microsoft Sans Serif';underline=1 );multiline=1;notify=1;transparent=1;z=22};
txtPath={cls="edit";left=97;top=47;right=373;bottom=70;dl=1;dt=1;edge=1;font=LOGFONT( h=-11 );readonly=1;z=25};
txtPid={cls="edit";left=267;top=120;right=373;bottom=141;dl=1;dt=1;edge=1;font=LOGFONT( h=-11 );readonly=1;z=16};
txtStyle={cls="edit";left=97;top=119;right=203;bottom=140;dl=1;dt=1;edge=1;font=LOGFONT( h=-11 );readonly=1;z=12};
txtStyleEx={cls="edit";left=97;top=142;right=203;bottom=163;dl=1;dt=1;edge=1;font=LOGFONT( h=-11 );readonly=1;z=13};
txtText={cls="edit";left=96;top=168;right=279;bottom=191;dl=1;dt=1;edge=1;font=LOGFONT( h=-11 );readonly=1;z=10};
txtTid={cls="edit";left=266;top=144;right=372;bottom=165;dl=1;dt=1;edge=1;font=LOGFONT( h=-11 );readonly=1;z=17}
)
/*}}*/

//置顶窗口
winform.chkTopMost.oncommand = function(id,event){
	win.setTopmost(winform.hwnd,winform.chkTopMost.checked)  
}

//加载自定义的鼠标指针
var hCursor = win.cur.loadfile("\res\spy.cur") ;
 
//主窗体回调函数
winform.pic1.wndproc = function (hwndTarget, uMsg, wParam, lParam){
	select (uMsg){
		case 0x201/*_WM_LBUTTONDOWN*/{
			winform.pic1.image = $"\res\2.gif";
			
			winform.pic1.capture = true; //捕获全局鼠标消息
			win.cur.beginCur();//持续设定鼠标指针
		}
		case 0x202/*_WM_LBUTTONUP*/{ 
			winform.pic1.image = $"\res\1.gif";
			
			winform.pic1.capture = false; //释放鼠标
			win.cur.endCur(); //恢复正常鼠标指针 
			genCode()
		} 
	}
}

//显示窗口信息
function showWindowInfo(hwnd){
	winform.txtParenHwnd.text = string.format("%X",win.getParent(hwnd) )
	winform.txtHwnd.text = string.format("%X",hwnd )
	winform.txtClass.text = win.getClass(hwnd) 
	winform.txtId.text = win.getId(hwnd);
	
	var tid,pid = win.getThreadProcessId(hwnd)
	winform.txtTid.text,winform.txtPid.text = tid,pid;
	winform.txtPath.text = process.getPath(pid)
	
	var str = winex.getText(hwnd,50) ;
	if(str){
		winform.txtText.text = string.replace(str,"[\r\n]","")
	} 
	
	winform.txtStyle.text = tostring(::GetWindowLong(hwnd, 0xFFFFFFF0/*_GWL_STYLE*/) );
	winform.txtStyleEx.text = tostring(::GetWindowLong(hwnd, 0xFFFFFFEC/*_GWL_EXSTYLE*/) ); 
}

//点击父窗口句柄时显示父窗口信息
winform.txtParenHwnd.oncommand = function(id,event){
    var hwnd = tonumber(  winform.txtParenHwnd.text,16)
    if(hwnd){
		showWindowInfo(hwnd);
		genCode(hwnd)
	} 
}

import process
winform.button.oncommand = function(id,event){

	winform.button.disabled = true;
	
	var hwnd = tonumber(  winform.txtHwnd.text,16)
	var tid,pid = win.getThreadProcessId(hwnd)
	var prcs = process( pid )
	var getWindowText_call = prcs.remoteApi("int(int hwnd,string& lpString,int cch)" ,"User32.dll","GetWindowTextA" )
	nil,winform.txtText.text = getWindowText_call(hwnd,50,50);
	prcs.free();
	
	winform.button.disabled = false;
	
}//endproc

CreatePen			= Gdi32.api("CreatePen", "pointer(int nStyle, int nWidth, int nColor)");
Rectangle			= Gdi32.api("Rectangle", "int(pointer hDC, int nLeft, int nTop, int nRight, int nBottom)");
SetROP2				= Gdi32.api("SetROP2", "int(pointer hDC, int nMode)"); 
flashRect = function(rc){
		var hDC = ::GetWindowDC(0);
		var screenCx,screenCy = win.getScreen()
		
		/** 防止溢出 Start **/
		rc.right =  math.min(rc.right,screenCx) ;
		rc.bottom =  math.min(rc.bottom,screenCy) 
		if (rc.left < 0)
			rc.left = 0;
		if (rc.top < 0)
			rc.top = 0; 
		/** 防止溢出 End **/
		
		var hPen = CreatePen(0x0/*_PS_SOLID*/, 3, 0);
		var hOldPen = ::SelectObject(hDC, hPen);
		var oldROP2 = SetROP2(hDC, 0xA/*_R2_NOTXORPEN*/);
		Rectangle(hDC, rc.left, rc.top, rc.right, rc.bottom);
		sleep(300);
		Rectangle(hDC, rc.left, rc.top, rc.right, rc.bottom);
		SetROP2(hDC, oldROP2);
		::SelectObject(hDC, hOldPen);
		::DeleteObject(hPen);
		::ReleaseDC(0, hDC);
}



var hwndTarget;// 用来保存探测到的窗口句柄
tmid = winform.addtimer(
	600/*毫秒*/, 
	function(hwnd,msg,id,tick){
		// 定时执行代码
		// 如果鼠标指针是探测状态
		if ( win.cur.beginning ){

			hwndTarget = winex.fromPointReal( mouse.getPos() ) : winex.fromPoint( mouse.getPos() );
			if (hwndTarget){
				var lpRect = win.getRect(hwndTarget,true)
				showWindowInfo(hwndTarget);
				flashRect(lpRect)
			
			}
		}
		elseif( winform.chkForeground.checked ){
			showWindowInfo( win.getForeground() );
		}
	}
)

getPattern = function(str){
	if(!#str)
		return "";
		
	var mbs = string.match(str,"[\s\w]*:+[\s\w]*")
	if(#mbs)
		return mbs;
		
    str = string.replace(str,"(\p)","\\\1") 
    str = string.replace(str,"\d+","\\d+") 	
    return str;
}
 

var templateCtrl = /**
import winex;
import process;
import fsys.lnk;

var exepath = "$EXEPATH"; 
var setpath = fsys.lnk.search( "$EXEFILENAME" )
if( setpath){
	exepath = setpath;
}

if( ! process.find(exepath) ) 
	process.execute(exepath) 
	

//查找指定的主窗口
窗口句柄,线程ID,进程ID = winex.find("$窗口类名","$窗口标题" )

//按类名查找控件
控件句柄 = winex.findEx(窗口句柄,$第几个相同类名,"$控件类名" )

//按更多特征查找控件
控件句柄 = winex.findEx(窗口句柄,$第几个匹配,"$控件类名","$控件标题"$控件ID)
	
//查找指定的窗口
窗口句柄,控件句柄,线程ID,进程ID = winex.findExists( "$窗口标题","$控件标题","$窗口类名","$控件类名"$控件ID )

//查找指定的窗口并激活
窗口句柄,控件句柄,线程ID,进程ID = winex.findActivate( "$窗口标题","$控件标题","$窗口类名","$控件类名"$控件ID )
	
//等待指定的窗口
窗口句柄,控件句柄,线程ID,进程ID = winex.wait( "$窗口标题","$控件标题","$窗口类名","$控件类名"$控件ID )

//等待指定的窗口启用
窗口句柄,控件句柄,线程ID,进程ID = winex.waitEnabled( "$窗口标题","$控件标题","$窗口类名","$控件类名"$控件ID )

//等待指定的窗口显示
窗口句柄,控件句柄,线程ID,进程ID = winex.waitVisible( "$窗口标题","$控件标题","$窗口类名","$控件类名"$控件ID )

//等待指定的窗口打开到激活状态,注意个别窗口无法获取激活状态,应避免使用此函数
窗口句柄,控件句柄,线程ID,进程ID = winex.waitActive( "$窗口标题","$控件标题","$窗口类名","$控件类名"$控件ID )

//模拟点击方法一
winex.click(控件句柄);

//模拟点击方法二
winex.click(窗口句柄$控件ID);

//关闭窗口
winex.close(窗口句柄) 

//退出窗口程序
winex.quit(窗口句柄) 

//修改标题
winex.setText(窗口句柄,"我是新的标题");

//最小化
win.show(窗口句柄,0x6/*_SW_MINIMIZE*/) 

//调用API闪烁窗口
FlashWindow = ::User32.api("FlashWindow", "int(int hwndTarget, int bInvert)")
FlashWindow(窗口句柄, 0);
**/


var templateTopWindow = /**
import winex;
import process;
import fsys.lnk;

var exepath = "$EXEPATH"; 
var setpath = fsys.lnk.search( "$EXEFILENAME" )
if( setpath){
	exepath = setpath;
}

if( ! process.find(exepath) ) 
	process.execute(exepath) 
		
//等待指定的窗口
窗口句柄, ,线程ID,进程ID = winex.wait( "$窗口标题","$控件标题","$窗口类名","$控件类名"$控件ID )

//查找指定的窗口
窗口句柄, ,线程ID,进程ID = winex.findExists( "$窗口标题","$控件标题","$窗口类名","$控件类名"$控件ID )

//查找指定的窗口并激活
窗口句柄, ,线程ID,进程ID = winex.findActivate( "$窗口标题","$控件标题","$窗口类名","$控件类名"$控件ID )

//等待指定的窗口打开到激活状态
窗口句柄, ,线程ID,进程ID = winex.waitActive( "$窗口标题","$控件标题","$窗口类名","$控件类名"$控件ID )

//查找指定的主窗口
窗口句柄,线程ID,进程ID = winex.find("$窗口类名","$窗口标题" ) 

//关闭窗口
winex.close(窗口句柄) 

//退出窗口程序
winex.quit(窗口句柄) 

//修改标题
winex.setText(窗口句柄,"我是新的标题");

//最小化
win.show(窗口句柄,0x6/*_SW_MINIMIZE*/) 

//调用API闪烁窗口
FlashWindow = ::User32.api("FlashWindow", "int(int hwndTarget, int bInvert)")
FlashWindow(窗口句柄, 0);
**/

winex.findEx = function(parent,count,cls ,text, id,resultIn ){
	var count2=0;
 	var result;
	winex.enum( 
		function( hwndfind,depth ){
			result = hwndfind; 
			if( count || resultIn ){
				count2++;   
				if(resultIn){
					result = count2;
					if( resultIn != hwndfind){
						return true;
					}
				}
				else {
					if( count2 < count ) 
						return true; //接着找 
				}
				
			}
			return false;//停止查找
			
		} 
		,parent
		,cls
		,text
		,id
	)
	
	return result;
}

//使edit控件支持Ctrl+A
import key;
winform.editCode.wndproc = function(hwnd,message,wParam,lParam){
	
	if(message=0x100/*_WM_KEYDOWN*/){
		if( wParam == 'A'#){
			if(key.getState(0x11/*_VK_CTRL*/) ){
				winform.editCode.setsel(0,-1);
				return false;
			}
		}
	}
}
 
import process;
genCode = function(hwndCtrl){   
	hwndCtrl := hwndTarget;
	if(!hwndCtrl)
		return;
		
	hwndTop = win.getRoot(hwndCtrl);
	var code;
	if(hwndTop == hwndCtrl ){
		hwndCtrl = win.findEx(hwndTop,0)
		code = templateTopWindow;
	}
	else { 
		code = templateCtrl;
	}
	
	var tid,pid = win.getThreadProcessId(hwndTop);
	var prcs = process(pid);
	if(!prcs)return;
	var path = prcs.getPath();
	code =  string.replace( code,"@$EXEPATH",path) 
	prcs.free(); 
	prcs = null;
	
	var tpath = io.splitpath(path)
	code =  string.replace( code,"@$EXEFILENAME",getPattern(tpath.file) );
	
    var title = getPattern(winex.getText(hwndTop));
    var text = getPattern(winex.getText(hwndCtrl,20));
    var cls = getPattern( win.getClass(hwndTop) )
    var clsCtrl = getPattern( win.getClass(hwndCtrl) )
    var id = win.getId(hwndCtrl)
 
	code =  string.replace( code,"@$窗口标题",title)
	code =  string.replace( code,"@$控件标题",text)
	code =  string.replace( code,"@$窗口类名",cls)
	code =  string.replace( code,"@$控件类名",clsCtrl)
	
	code =  string.replace( code,"@$控件ID",id ? ( ','+ id ) : "")

	//移除空字符串
	code =  string.replace( code,'@""',"")
	 
	var countCls = winex.findEx(hwndTop, ,clsCtrl, , ,hwndCtrl)
	var count = winex.findEx(hwndTop, ,clsCtrl,title,id,hwndCtrl)
	
	code =  string.replace( code,"@$第几个相同类名",countCls:"")
	code =  string.replace( code,"@$第几个匹配",count:"")
	
	winform.editCode.text = code;
	winform.button.disabled = false;
	
	winform.editCode.lineScroll(1,20)
	winform.editCode.setsel(0,-1)
}

winform.show(true);
win.loopMessage(); 
return winform;
本博客所有文章如无特别注明均为原创。作者：恶猫 ，复制或转载请以超链接形式注明转自 恶猫的博客 。
原文地址《aardio版的窗口探测器Winspy，很好用的》
标签: AARDIO spy

相关推荐

WRITTEN BY

avatar

发表评论

路人甲 表情
看不清楚？点图切换 Ctrl+Enter快速提交

网友评论（0）

日历

分类

我的代码 (43) 我的软件 (3) 叨逼叨逼 (16) 大家福利 (4) 我的生活 (0)

热门文章

猜你喜欢

标签云

AAU (4) AAUTO (1) AARDIO (17) 检查是否注册 (1) 快手 (2) 编码解码 (1) 整理内存 (1) 释放内存 (1) 获取本机qq号码 (1) spy (1) winspy++ (1) php小偷 (1) jQuery (1) animate (1) adsl (1) 本机ip (1) ip138 (1) 批量替换关键字 (1) 五星缩水 (1) iis6乱码 (1) aarido (1) webkit (2) Html5Loading载入 (1) 发布单个exe文件 (1) 监控qq群消息记录 (1) urlrewrite (1) isapi (1) aardio加密 (1) aardio注册验证 (1) qq空间gtk算法 (1) 网络拦截 (1) 网络劫持 (1) PostMessage (1) webform (1) webbrowser (1) 安全连接 (1) 弹出窗口 (1) gif动画 (1) 视频短片 (1) 优酷VIP视频解析 (1) 录制视频 (1) 免广告播放视频 (1) 源码 (1) 爱奇艺VIP视频解析 (1) 视频网站第三方解析 (1) 视频解析接口 (1) 全自动外链 (1) seo (1) 不重复打开子窗口 (1) Affiliate (1) 网页正文提取 (1) 浏览器 (1) User-Agent (1) UA (1) 获取浏览器User-Agent (1) 单本小说采集器 (1) 环球捕手 (1) 涉嫌传销 (1) ecshop小京东 (1) 微信昵称 (1) 黑彩 (1) 私彩 (1) 时时彩 (1) 广告 (1) win10家庭版 (1) gpedit.msc (1) VirtualHardwares (1) 修改电脑机器码 (1) apache (1) phpstudy (2) 无法启动服务 (1) seowhy (1) Rundll32.exe (1) InetCpl.cpl (1) ClearMyTracksByProcess (1) ffmpeg (1) php木马 (1) php源码 (1) 木马源代码 (1) dedecms免登录 (1) dedecms自动登录 (1) 织梦自动登录 (1) dedecms (2) 织梦 (2) 生成栏目空白 (1) dedecms后台空白 (1) post (1) no (1) 管理后台 (1) such (1) file (1) or (1) directory (1) memcached (1) windows10 (1) 正在解析代理服务器 (1) dnsdun (1) dns盾 (1) 批量解析域名软件 (1) 域名批量解析软件 (1)

恶猫的博客 -记录自己日常，代码，美图，电影，音乐，新闻，只是个人博客而已

浙ICP备15011757号-4 网站地图 联系我