摘要： 该日志由 傻猫 发表于 2010-07-21 13:00:31需要一个用来注入的dll（inject.dll）及一个调用程序(caller.exe)流程：caller.exeprocedure TestHook;var pwnd,hChild, hwndInject :hwnd; msg:tmsg;begin //通过窗口标题用FindWindow找到要注入的程序的主窗口句柄pwnd pwnd := findwindow('Progman',nil); //用FindwindowEx(hMain,0,nil,nil)找到要处理的子窗口句柄hChild hChild := fin 阅读全文

摘要： keybd_event模拟键盘输入密码该日志由 傻猫 发表于 2011-01-23 13:25:34function TFrm_main.InputChar(str: string): Boolean;vari : integer;c : byte;begin for i := 1 to Length(str) do begin c := VkKeyScan(str[i]) and 255; //输入文字 keybd_event(c,0,0,0); keybd_event(c,0,KEYEVENTF_KEYUP,0); end;end;Delphi统计字数（汉字+字母+符号）该日志由 傻猫 发 阅读全文