IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Delphi Discussion :

intercepter touche pressée


Sujet :

Langage Delphi

  1. #1
    Membre régulier
    Profil pro
    Développeur informatique
    Inscrit en
    Janvier 2003
    Messages
    188
    Détails du profil
    Informations personnelles :
    Localisation : France, Pyrénées Atlantiques (Aquitaine)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Janvier 2003
    Messages : 188
    Points : 113
    Points
    113
    Par défaut intercepter touche pressée
    Bonjour,
    Je voudrais savoir comment est ce qu'on peut intercepter une touche (F12) sur une application a l'aide d'un programme delphi qui tournerait tout le temps en tache de fond et qui ferait, lui, des manipulations.

    Merci

  2. #2
    Expert éminent
    Avatar de qi130
    Homme Profil pro
    Expert Processus IT
    Inscrit en
    Mars 2003
    Messages
    3 910
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 63
    Localisation : France

    Informations professionnelles :
    Activité : Expert Processus IT
    Secteur : Finance

    Informations forums :
    Inscription : Mars 2003
    Messages : 3 910
    Points : 6 032
    Points
    6 032
    Par défaut
    Recherche le terme KEYLOGGER dans la

    Il y a un lien vers un source de NoNo
    "Il n'y a pas de bonnes réponses à une mauvaise question." (M. Godet)
    -----------------------
    Pensez à cloturer votre sujet - Aucune réponse aux sollicitations techniques par MP
    Usus magister est optimus

  3. #3
    Rédacteur/Modérateur
    Avatar de Andnotor
    Inscrit en
    Septembre 2008
    Messages
    5 744
    Détails du profil
    Informations personnelles :
    Localisation : Autre

    Informations forums :
    Inscription : Septembre 2008
    Messages : 5 744
    Points : 13 303
    Points
    13 303
    Par défaut
    Ou un hook de bas niveau.

  4. #4
    Modérateur

    Homme Profil pro
    Ingénieur retraité
    Inscrit en
    Octobre 2005
    Messages
    2 396
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur retraité

    Informations forums :
    Inscription : Octobre 2005
    Messages : 2 396
    Points : 3 266
    Points
    3 266
    Par défaut
    Bonjour,

    Il y a plus simple :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    procedure TForm1.Timer1Timer(Sender: TObject);
    var       F1 : boolean;
    begin     Timer1.Interval := 10;
              F1:=GetAsyncKeyState(VK_F1) and 32768 <> 0;
              if F1 then showMessage('Il a tapé F1'); 
    end;
    Chez mois (Delphi 5 standard) ça marche avec toutes les touches sauf la F12 (VK_F12) qui déclenche une erreur en faisant surgir la fenêtre CPU.
    Mais peut-être n'est tu pas obligé de choisir justement la F12 ???

    A+.
    N'oubliez pas de consulter les FAQ Delphi et les cours et tutoriels Delphi

  5. #5
    Membre chevronné

    Profil pro
    Ingénieur développement logiciels
    Inscrit en
    Août 2002
    Messages
    1 289
    Détails du profil
    Informations personnelles :
    Âge : 43
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur développement logiciels

    Informations forums :
    Inscription : Août 2002
    Messages : 1 289
    Points : 1 940
    Points
    1 940
    Par défaut
    Pour le F12, c'est juste en le lançant à partir de l'IDE que ça ne marche pas.
    Delphi 7/XE2/XE3
    C#
    Oracle 9i à 12c
    SQL Server 2008 à 2022

  6. #6
    Modérateur

    Homme Profil pro
    Ingénieur retraité
    Inscrit en
    Octobre 2005
    Messages
    2 396
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur retraité

    Informations forums :
    Inscription : Octobre 2005
    Messages : 2 396
    Points : 3 266
    Points
    3 266
    Par défaut
    Re-bonjour,

    Linkin : Pour le F12, c'est juste en le lançant à partir de l'IDE que ça ne marche pas.
    ... OK, merci : c'est bon à savoir.

    A+.
    N'oubliez pas de consulter les FAQ Delphi et les cours et tutoriels Delphi

  7. #7
    Rédacteur/Modérateur
    Avatar de Andnotor
    Inscrit en
    Septembre 2008
    Messages
    5 744
    Détails du profil
    Informations personnelles :
    Localisation : Autre

    Informations forums :
    Inscription : Septembre 2008
    Messages : 5 744
    Points : 13 303
    Points
    13 303
    Par défaut
    Dommage de passer par un timer lorsqu'on a la possibilité d'être notifié de façon sûre et certaine.

  8. #8
    Modérateur

    Homme Profil pro
    Ingénieur retraité
    Inscrit en
    Octobre 2005
    Messages
    2 396
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur retraité

    Informations forums :
    Inscription : Octobre 2005
    Messages : 2 396
    Points : 3 266
    Points
    3 266
    Par défaut
    Bonjour,

    Andnotor Dommage de passer par un timer lorsqu'on a la possibilité d'être notifié de façon sûre et certaine.
    ... avec le GetAsyncKeyState dans le timer on est également notifié de façon sûre et certaine et comme Coucoucmoi ne veut apparamment intercepter q'une seule et unique touche cela évite de s'encombrer avec une toute une usine à gaz. A Coucoucmoi de choisir...

    A+.
    N'oubliez pas de consulter les FAQ Delphi et les cours et tutoriels Delphi

  9. #9
    Rédacteur/Modérateur
    Avatar de Andnotor
    Inscrit en
    Septembre 2008
    Messages
    5 744
    Détails du profil
    Informations personnelles :
    Localisation : Autre

    Informations forums :
    Inscription : Septembre 2008
    Messages : 5 744
    Points : 13 303
    Points
    13 303
    Par défaut
    Citation Envoyé par Gilbert Geyer Voir le message
    ... avec le GetAsyncKeyState dans le timer on est également notifié de façon sûre et certaine
    Si le système est surchargé, ta procédure sera exécutée quand le processeur en aura le temps. Je doute fort que tu retrouves toutes les frappes. Alors que le hook se place entre le buffer de clavier et la gestion de la frappe. Peu importe la charge du processeur, l'info transitera obligatoirement par ta procédure.

    Et je ne parle pas de keybd_event (osk) qui aura un temps inférieur à 10ms.

    Citation Envoyé par Gilbert Geyer Voir le message
    cCoucoucmoi ne veut apparamment intercepter q'une seule et unique touche cela évite de s'encombrer avec une toute une usine à gaz
    Un hook de bas niveau, c'est un appel à SetWindowHookEx (début), un a UnhookWindowsHookEx (fin) et une procédure. Pas vraiment une usine à gaz

    ps: S'il ne veut vraiment qu'une touche, il y a aussi les HotKey.

  10. #10
    Modérateur

    Homme Profil pro
    Ingénieur retraité
    Inscrit en
    Octobre 2005
    Messages
    2 396
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur retraité

    Informations forums :
    Inscription : Octobre 2005
    Messages : 2 396
    Points : 3 266
    Points
    3 266
    Par défaut
    Re-bonjour,

    Andnotor : Si le système est surchargé, ta procédure sera exécutée quand le processeur en aura le temps.
    ... Ah bon : ne savais pas. Ok merci pour l'info.

    A+.
    N'oubliez pas de consulter les FAQ Delphi et les cours et tutoriels Delphi

Discussions similaires

  1. intercepter touche ENTREE
    Par cool dans le forum WinDev
    Réponses: 3
    Dernier message: 17/07/2007, 16h06
  2. Assigne 0 à la touche pressée
    Par fikou dans le forum Windows Forms
    Réponses: 2
    Dernier message: 11/07/2007, 11h51
  3. Identifier la combinaisons de touches pressées
    Par belocom dans le forum VB.NET
    Réponses: 3
    Dernier message: 29/05/2007, 10h49
  4. [formulaire] événement touche pressée
    Par Guizbizet dans le forum IHM
    Réponses: 8
    Dernier message: 10/01/2007, 15h01
  5. [TMemo] Comment insérer les touches pressées ?
    Par Alexandre` dans le forum Composants VCL
    Réponses: 8
    Dernier message: 28/03/2005, 16h36

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo