begin process at 2010 02 10 08:02:20
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Delphi

 > 

Divers

 > 

Débutant(e)

 > 

Question Keylogger


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Question Keylogger

lundi 7 mai 2007 à 23:30:41 | Question Keylogger

Hardouz

salut j'utilise ce code pour recupérer les frappe du clavier et le prbléme c'est que si j'appuis sur n'importe quel touche (exemple 'A')le Tedit1.text recoit une serie de caractére genre AAAAAAAA selon la durer de l'appuis merci de me corriger le code (NB je debute encore j'ai 1 ou2 moi sniff)

procedure TForm1.Timer1Timer(Sender: TObject);
Var X:Byte;
Begin
For X:=0 to 255 do
    Begin
        If GetAsyncKeyState(X)<>0 then
         begin
                Edit1.Text:=Edit1.text + Chr(X);
        End;
   End;
End;

mardi 8 mai 2007 à 01:08:34 | Re : Question Keylogger

CptPingu

Il te faut ajouter un booleen, le mettre à faux lorsque tu as pressé une touche, et le remettre à vrai uniquement lors du relâchement de celle-ci.
Ensuite tu ne met à jour ton TEdit que si ce boolean vaut "vrai".

var
  IsDown : boolean = false;


procedure TForm1.Timer1Timer(Sender: TObject);
Var X:Byte;
Begin
For X:=0 to 255 do
    Begin
        If GetAsyncKeyState(X)<>0 and !IsDown then
         begin
                IsDown := true;
                Edit1.Text:=Edit1.text + Chr(X);
        End;
   End;
End;


Lorsque tu relâchera ton bouton (je ne me souviens plus du nom de la méthode), tu mettra IsDown  à "false";


Au fait, pourquoi veut-tu faire un KeyLogger ?

mardi 8 mai 2007 à 07:04:24 | Re : Question Keylogger

moldov

Salut, Sinon tu peux essayer avec les méthodes OnKeyDown et OnKeyUp de ton TEdit et tu ne sera pas comfronté a ce problème de touche appuyée longtemps. Bonne Prog
mardi 8 mai 2007 à 09:11:09 | Re : Question Keylogger

Loda

Membre Club
Réponse acceptée !
salut,

je ne sais pas quel est ton but., mais tu t'y prend assez mal. Utiliser un timer et un get getAsyncrone state c'est pas le plus propre. en plus, cela ne te permet pas de capturer les saisies plus rapide que ton timer ni déliminer les doubles. renseigne toi sur OnKeyDown et KeyPreview. si tu veux faire un keylogger, il te faut utiliser une autre approche.

reagrde ici:
http://www.delphifr.com/infomsg_ENREGISTE-TOUCHE-CLAVIER_935893.aspx#4

bonne lecture,

Loda

Se poser les bonnes questions est le premier pas pour trouver les bonnes réponses.
mardi 8 mai 2007 à 12:30:30 | Re : Question Keylogger

Hardouz


Pouvez vous m'expliquer le truc de OnKeypress et OnKeyUp ect ....
Merci d'avance :)
mardi 8 mai 2007 à 15:27:48 | Re : Question Keylogger

Loda

Membre Club
Je suppose que tu as lue attentivement l'aide. Je supppose aussi que tu as fait des essais. Je supose aussi que tu as lue/fait un exemple simple. Je suppose aussi que tu as essayer/étudier les sources de keylogger de ce site.

Donc, quel est ta question? ça marche pas? Tu comprend pas?Quelle partie de marche pas? Quel partie ne comprends-tu pas? Poste nous ton code d'essai qu'on te dise où est le problème.

...

Loda

Se poser les bonnes questions est le premier pas pour trouver les bonnes réponses.


Cette discussion est classée dans : text, end, question, keylogger, begin


Répondre à ce message

Sujets en rapport avec ce message

projet de chat avec delphi 7 [ par dk ] hello every body j'aimerais faire un chat mais voila le probleme (si on peut dire) c ke g delphi 7 avec comme composant installer Tcpserver et Tcpclie plein derreur a la fermeture de mon prog qui font lanter windows [ par dk ] voila javais deja eu qq petits soucis avec le prjet de chat que je suis en train de realiser mais jamais a cette ampleur lol, qd je lance mon prog ca Creation d'un chat [ par kitana ] bonjour, je fais un chat pour mon exam de lundi :s à partir d'un exemple d'un livre de delphi et je n'arrive pas à faire la partie deconnexion : je Unicode SQL [ par domchap ] salutje fais un prg pour aider à apprendre le polonais, tout de suite j'ai été confroté au problème des lettres de la langue, j'ai donc utilisé l'unic Selectionner plusieur Chaines [ par louiwahl ] Bjr Dans mon programe j'ai une fonction qui cherche des Chaine et les change de couleur quand il les trouve mais si dans mon text il y a plusieur foi Probleme de requete UPDATE pour modifier de champs dans ma dbgrid [ par cmeme ] Salut merciii à l'avance pour votre aide ;) Voila mon code mais la requete ne fais rien , elle change rien dans ma DBgrid < vk_return to <br> [ par Also know as ] Salut,Bon voilà jesuis en train de bosser sur un petit projet personnel pour transformer mes pages txt en fichier HTML.J'utilise deux memo.Une qui écr StringGrid trop aléatoirement [ par BKnet ] Bonjour tout le monde,  J’essai de faire une grille de loto avec une StringGrid, je voudrai que la case ou on a cliqué dessus change de couleur, ma (Fin) faire affecter deux edits accompagnés d'un combobox [ par yeho ] Salut!J'ai du me ''casser'' serieusement la tête afin d'apprendre comment faire affecter deux edits à la fois à partir des items logés dans un combobo Comment relier deux modules de codes d'un combobox? [ par leader2000 ] Salut á Tous! Je vous demande de me venir en aide s'il vous plait.j'ai avec moi ces codes (filtrage, somme, enregistrement, etc).En runtime, quand j


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,452 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales