*****查看技术


Windows系统的密码是很脆弱的，因为所有的密码输入的时候都显示为******** 
表面上看这很安全，因为一般人不懂*******是什么东西，但其实要看到******* 
下的内容是很容易的事，工作原理如下: 
Windows是基于窗口的消息驱动型作业系统，每个窗口都有自已的属性,其中密码窗 
口的属性是ES_PASSWORD，所以我们可以利用枚举子窗口EnumChildWindows的方法 
来找出系统中所有子窗口，再检查其属性GetWindowLong，若是ES_PASSWORD则是个密码窗 
然后用SendMessage()取得窗口标题，那就是******下的真正内容 



=========下面是Delphi程序===================== 

program LookPass; 

inte易做图ce 

uses 
 Windows, Messages, SysUtils; 
var 
 hcount:integer; 

//这是一个窗口响应函数，注意：Result:=true很重要，因为只有这样才能连续扫描所有子窗口 
function lpEnumFunc(hwnd:integer;uint:integer):boolean;stdcall; 
var hw,hs,wlong:integer; 
   sbuf,sb2:array[0..256] of char; 
   sb1:string; 
begin 
   //得到窗口的属性 
   wlong:=GetWindowLong(hwnd,GWL_STYLE); 
   //若属性为es_password则为密码窗 
   if (wlong and ES_PASSWORD)<>0 then 
   begin 
       inc(hcount); 
       //发送获取窗口标题的消息 
       sendmessage(hwnd,wm_gettext,40,integer(@sbuf)); 
       //设置得到的密码 
       strpcopy(sbuf,format([Password %d] = %s,[hcount,sbuf])); 
       //显示密码 
   end; 
   //result为true时继续扫描下一个子窗口 
   result:=true; 
end; 


begin 
    lp:=0;hcount:=0; 
    //枚举子窗口,GetDesktopWindow用来得到桌面的句柄 
    EnumChildWindows(GetDesktopWindow,@lpEnumFunc,lp); 
end. 
////////////////////////////////////////////////////////////////////////////// 
                             作者:倪建华 
                Copyright (C) 2001-6-27 Allright Reserved.

补充：软件开发 , Delphi ,