B
BIYANHUAJIMO
Unregistered / Unconfirmed
GUEST, unregistred user!
DELPHI如何记录EDIT中的密码？？？
会的朋友发一下源码，谢谢。
会的朋友发一下源码，谢谢。
S
sadnui
Unregistered / Unconfirmed
GUEST, unregistred user!
getwindowtext
sendmessage get_text
能获取怎么记录就是自己的事了
对方程序保护不是很强的话本简单的说
sendmessage get_text
能获取怎么记录就是自己的事了
对方程序保护不是很强的话本简单的说
S
szhcracker
Unregistered / Unconfirmed
GUEST, unregistred user!
你要实现什么功能呢？
B
BIYANHUAJIMO
Unregistered / Unconfirmed
GUEST, unregistred user!
如何获取EDIT里面的密码，怎么做，给个源码谢谢。
S
szhcracker
Unregistered / Unconfirmed
GUEST, unregistred user!
给你一个简单的Demo试试：(使用时放一个Timer1，在它的Timer事件里调用)
procedure GetPassWord;
var
Pos: TPoint;
Handle: HWND;
Buf: array[0..1024] of Char;
begin
GetCursorPos(Pos); //得到当前光标位置
Handle := WindowFromPoint(Pos); //返回当前位置的句柄
GetClassName(Handle, Buf, 1024); //得到类名
ClassNameText.Text := Buf;
SendMessage(Handle, WM_GETTEXT, 33, Integer(@Buf)); //得到标题
Edit1.Text := Buf; //得到内容
end;
procedure GetPassWord;
var
Pos: TPoint;
Handle: HWND;
Buf: array[0..1024] of Char;
begin
GetCursorPos(Pos); //得到当前光标位置
Handle := WindowFromPoint(Pos); //返回当前位置的句柄
GetClassName(Handle, Buf, 1024); //得到类名
ClassNameText.Text := Buf;
SendMessage(Handle, WM_GETTEXT, 33, Integer(@Buf)); //得到标题
Edit1.Text := Buf; //得到内容
end;
S
szhcracker
Unregistered / Unconfirmed
GUEST, unregistred user!
不过如果对方做过保护的话你就得不到了，比如我的Edit框就用全局钩子拦截了SendMessage等相关API函数及相关消息，用网上所谓的“星号密码查看器”是看不到的。[
]
]
B
BIYANHUAJIMO
Unregistered / Unconfirmed
GUEST, unregistred user!
接受答案了.
