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

Delphi Discussion :

Commande pour désactiver le clavier


Sujet :

Delphi

  1. #1
    Membre du Club
    Profil pro
    Inscrit en
    Janvier 2005
    Messages
    182
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2005
    Messages : 182
    Points : 66
    Points
    66
    Par défaut Commande pour désactiver le clavier
    Existe-t-il une commande sous Delphi permettant de désactiver le clavier et un autre pour le réactiver ?
    Mon pb est le suivant : dans mon application, si j'appuie un grand nombre de fois sur la touche Enter ( ou d'autre ) cela me lance des traitements alors que d'autres ne sont pas terminé.
    Un commande globale serait idéale car sinon je vais être obligé de gérer manuellement toutes les touches du clavier ( car j'ai de nombreux raccourcis ) et dans ce cas, comment faire ?
    Merci d'avance de votre aide.

  2. #2
    Membre éclairé
    Avatar de denokan
    Homme Profil pro
    Développeur Web
    Inscrit en
    Mars 2002
    Messages
    434
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 45
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Développeur Web
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Mars 2002
    Messages : 434
    Points : 746
    Points
    746
    Par défaut
    ne peux-tu pas simplement afficher un popup indiquant que l'application effectue une opération lourde, et ainsi ne pas envoyer les touches clavier vers la form qui effectue le traitement ?
    Donnez un poisson à un homme et il mangera pendant un jour... Apprenez-lui à pêcher et il s'assiéra dans une barque et boira de la bière toute la journée

  3. #3
    Membre éclairé
    Profil pro
    Inscrit en
    Février 2006
    Messages
    624
    Détails du profil
    Informations personnelles :
    Âge : 49
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 624
    Points : 754
    Points
    754
    Par défaut
    Existe-t-il une commande sous Delphi permettant de désactiver le clavier et un autre pour le réactiver ?
    Mon pb est le suivant : dans mon application, si j'appuie un grand nombre de fois sur la touche Enter ( ou d'autre ) cela me lance des traitements alors que d'autres ne sont pas terminé.
    Un commande globale serait idéale car sinon je vais être obligé de gérer manuellement toutes les touches du clavier ( car j'ai de nombreux raccourcis ) et dans ce cas, comment faire ?

    J'en ai vu des conceptions tordues mais alors celle là!

    Tu peux gérer dans le code l'interception des messages ou bien ne pas relancer un traitement s'il y en a un en cours ( un simple test suffit ).

  4. #4
    Expert éminent Avatar de Graffito
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    5 993
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 5 993
    Points : 7 903
    Points
    7 903
    Par défaut
    Bonjour,

    Une solution : créer un bouton caché sous un autre composant avec aucun traitement sur son événement Onclick.
    Lorsqu'on a lancé le traitement, mettre sa propriété "default" a true : un appui sur Enter est équivalent à un Click souris sur le bouton caché et ne fera donc rien.
    A la fin du traitement, il suffit de remettre la propriété "default" sur le bouton d'éxécution.
    " Le croquemitaine ! Aaaaaah ! Où ça ? " ©Homer Simpson

  5. #5
    Membre éprouvé
    Avatar de neilbgr
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Août 2004
    Messages
    651
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Août 2004
    Messages : 651
    Points : 1 177
    Points
    1 177
    Par défaut
    Il existe aussi un composant qui s'appel TActionList, on y gère des actions, que l'on peut mettre enbaled := false; quelque soit les touches raccourcies.
    A moins qu'on ne fasse pas du dévloppement logiciel ici, mais les boutons cachés ou autre débranchage de clavier pour éviter que l'utilisateur fasse quoi que ce soit, c'est pas très folichon folichon.
    "Si vous voulez être l’esclave des banques et payer pour financer votre propre esclavage, alors laissez les banquiers créer la monnaie" - Josiah Stamp, 1920, Gouverneur de la Banque d’Angleterre
    "Qui ne peut acheter ruine qui voudrait vendre" - Jacques Duboin.
    "Nous n'héritons pas la terre de nos parents, nous l'empruntons à nos enfants." - Antoine de Saint Exupéry

  6. #6
    Modérateur
    Avatar de Rayek
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mars 2005
    Messages
    5 235
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mars 2005
    Messages : 5 235
    Points : 8 504
    Points
    8 504
    Par défaut
    Reste aussi la solution de mettre la form inactive le temps du traitement

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
      Maform.Enabled := False;
    Et à la fin du traitement

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
      MaForm.Enabled:= True;
    Modérateur Delphi

    Le guide du bon forumeur :
    __________
    Rayek World : Youtube Facebook

Discussions similaires

  1. [LibreOffice][Texte] Ajout de commandes pour raccourcis clavier sur Libre Office
    Par martinimy dans le forum OpenOffice & LibreOffice
    Réponses: 7
    Dernier message: 31/12/2014, 16h15
  2. Réponses: 2
    Dernier message: 17/02/2008, 09h42
  3. TEdit numérique pour tous les claviers
    Par totofweb dans le forum C++Builder
    Réponses: 2
    Dernier message: 10/06/2004, 11h20
  4. Réponses: 2
    Dernier message: 23/03/2004, 11h24
  5. Ligne de commande pour Turbo Pascal?
    Par GeffD dans le forum Turbo Pascal
    Réponses: 7
    Dernier message: 24/02/2004, 12h25

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