About Taringa!

Popular channels

Keylogger con Delphi

En este manual, vamos a ver como se programa un Keylogger desde cero, asumiendo que los
conceptos que tenemos sobre el lenguaje de programación Delphi son mínimos.

¿Qué es un Keylogger?

Es un tipo de software que se encarga de registrar las pulsaciones que se realizan en el teclado, para memorizarlas en un fichero o enviarlas a través de Internet.

No es considerado un virus. Pero sí es considerado un Troyano.
-------------------------------------------------------------------------------------------------------------------------
Iniciaremos abriendo un nuevo formulario en Delphi.
Añade un Memo a tu Formulario, ponle la propiedad ReadOnly a true y borrale las “lines” que
tenga.
Añadele un Timer (que está en la pestaña System) y ponle el intervalo a 5 (milisegundos).
Luego haz doble click en el Timer y escribes esto:


Ahora ejecuta la aplicación y notarás como el Memo captura todas las teclas que tú presiones en el teclado, desde cualquier ubicación.

Explicación:
La función GetAsyncKeyState determina si una tecla está pulsada en el momento en el que se
llama a la función.
La variable “a” que le pasamos a GetAsyncKeyState es un "Virtual Key Code"


http://help.adobe.com/es_ES/AS2LCR/Flash_10.0/help.html?content=00000525.html

Como puedes ver en esa página las letras A-Z van desde el 41 al 5A (hexadecimal) que pasado
a decimal es desde 65 hasta 90.
Entonces lo que hace el código es un bucle comprobando si:
GetAsyncKeyState(65)=-32767 (letra A)
...
...
GetAsyncKeyState(90)=-32767 (letra Z)
Mirando cual es el estado de las distintas teclas, si es igual a -32767 entonces significa que esa
tecla estaba pulsada y la añade al memo.
Char(a); Convierte un número a su correspondiente caracter ASCII.

Espero que haya quedado claro el funcionamiento de este pequeño ejemplo, aunque nos ha quedado un Keylogger malísimo...

Se ve una ventana (no es invisible)
No guarda las capturas
No reconoce las mayúsculas ni minúsculas.
No identifica algunos caracteres.
No identifica la ventana donde se escribe

En fin muy simple, pues éste era sólo un ejemplo de su funcionamiento del uso de las Apis de
Windows.

Ahora vamos en serio...
post #2

http://www.taringa.net/posts/ebooks-tutoriales/18270629/Keylogger-con-Delphi-parte-2.html
0No comments yet
      GIF