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

Turbo Pascal Discussion :

[TPW] Touches étendues


Sujet :

Turbo Pascal

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre du Club
    Inscrit en
    Février 2006
    Messages
    8
    Détails du profil
    Informations forums :
    Inscription : Février 2006
    Messages : 8
    Par défaut [TPW] Touches étendues
    Bonjour bonjour
    Alors voila le probleme! Je travail sur TPW 1.5 et c'est déjà un premier probleme.
    Je veux faire un programme me permettant de détecter lorsque l'utilisateur tape sur une touche fleche haut bas droite ou gauche.
    Au début j'ai fait un code simple en recharchant le code ASCII de ces touches (avec un readkey et tout). Mais ca marchait pas et j'ai compris lorsque j'ai lu dans les tutoriaux que comme par hasard les seules touches dont je voualis me servir ne voualient pas faire comme toutes les autres (rien que pour moi ) qu'elles étaient étendues...
    Bref j'ai refait un code en faisant 2 readkey pour detecter la lecture d'une touche étendue. Mais il ne marche pas et les codes qu'on propose ici http://www.developpez.net/forums/viewtopic.php?t=68346 ne marche pas non plus. Je pense que c'est dut à mon compilateur et donc est-ce que vous savez ce que je dois changer?

    Voila le code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
     
    program test;
    uses wincrt;
     
    Begin
         repeat
              if keypressed then 
                               begin
                                  if ord(readkey)=0 then
                                                  begin
                                                     case ord(readkey) of
                                                        73:writeln('fleche du haut');
                                                        81:writeln('fleche du bas');
                                                        77:writeln('fleche de droite');
                                                        75:writeln('fleche du gauche');
                                                     end;
                                                  end;
                               end;
         until ord(readkey)=13;
         writeln('Au revoir');
    end.
    Merci d'avance

  2. #2
    Membre Expert
    Avatar de Eric Sigoillot
    Inscrit en
    Mars 2002
    Messages
    1 212
    Détails du profil
    Informations personnelles :
    Âge : 41

    Informations forums :
    Inscription : Mars 2002
    Messages : 1 212
    Par défaut
    Bonjour,

    TPW signifie Turbo Pascal for Windows. La moindre des choses est donc de faire de la programmation Windows avec TPW... Vous vous lancez dans un code de type Dos, qui permettait d'intercepter les touches clavier de manière simple et directe.
    Sous Windows, ça ne se passe pas de manière aussi simple. Il faut passer à une programmation Windows complète, avec gestion des messages dans la boucle des messages. La fenêtre blanche offerte par TPW via WinCRT est très limitée, il ne faut pas en attendre trop non plus.

    @++

  3. #3
    Membre du Club
    Inscrit en
    Février 2006
    Messages
    8
    Détails du profil
    Informations forums :
    Inscription : Février 2006
    Messages : 8
    Par défaut
    Ben c'est bien ce que je pensais. C'est que je programme sur TPW pour les cours mais l'an prochain on passera au C sur Delphi et ca sera déjà mieux! Sinon je vais me débrouiller avec les fleches du pavé numérique (4 2 3 8) car la méthode que j'ai posté et que j'ai trouvé sur un autre sujet du forum marche pour les touches non étendues (a-> Z , entrée...).
    Merci de m'avoir répondu!

  4. #4
    Rédacteur/Modérateur
    Avatar de M.Dlb
    Inscrit en
    Avril 2002
    Messages
    2 467
    Détails du profil
    Informations personnelles :
    Âge : 40

    Informations forums :
    Inscription : Avril 2002
    Messages : 2 467
    Par défaut
    Le C sur Delphi ? Faut s'accrocher !...

    Tu dois peut-être parler du pascal objet

  5. #5
    Membre Expert
    Avatar de Eric Sigoillot
    Inscrit en
    Mars 2002
    Messages
    1 212
    Détails du profil
    Informations personnelles :
    Âge : 41

    Informations forums :
    Inscription : Mars 2002
    Messages : 1 212
    Par défaut
    Ou alors le C++ sur Borland Delphi Studio qui rassemble Delphi et C++Builder

    Mais le C sur Delphi semble peu réaliste, c'est sûr

    @++

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [VB6] Touche impr écran
    Par SpaceFrog dans le forum VB 6 et antérieur
    Réponses: 6
    Dernier message: 12/11/2002, 08h38
  2. faire de la touche F1 une touche de raccourci?
    Par sb dans le forum Composants VCL
    Réponses: 3
    Dernier message: 06/08/2002, 11h11
  3. Détection de 2 touches appuyées
    Par cyrose dans le forum C++Builder
    Réponses: 2
    Dernier message: 26/07/2002, 17h25
  4. Cherche Nom des touches du clavier
    Par juan64 dans le forum C++Builder
    Réponses: 8
    Dernier message: 23/07/2002, 20h11
  5. Shortcut avec plusieurs touches
    Par scorpiwolf dans le forum C++Builder
    Réponses: 4
    Dernier message: 06/07/2002, 16h57

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