Discussion :

[windob]

Salut a tous,

Je développe actuellempent un petit programme en mode console sous Delphi 2007 et j'ai un leger probleme.

Je voudrais utiliser read(MyChar) (où Mychar est de type char) de façon a ne pas avoir a appuyer sur enter pour valider chaque saisie.

J'ai lu partout que normalement, ça devrait fonctionner mais le probleme est que ça ne fonctionne pas chez moi :
Je peux taper autant de caracteres que je veux et en plus, il faut faire enter pour valider la saisie.

Connaissez-vous une solution ?

Merci d'avance.

[ShaiLeTroll]

As-tu essayé ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
AssignFile(F, '');
BlockRead(F, MyChar, 1);

Récemment quelqu'un a eu le même problème, je ne retrouve pas ma réponse à ce sujet ...

[windob]

Merci de ta réponse mais ça ne fonctionne pas plus.

Je précise que je veux lire une saisie sur la console et non dans un fichier texte mais j'ai quand meme essayé de faire marcher ton exemple en déclarant F comme TextFile mais ça ne marche pas.

[ShaiLeTroll]

BlockRead supporte TextFile ? cela me supprend (normalement c'est incompatible) et en mettant, juste File pour lire un simple binaire au lieu d'un préformatage texte avec TextFile;
Normalement, si AssignFile se voit spécifier un fichier sans nom, il prend l'input standard donc le clavier, ... c'est dingue que le pascal n'est pas un GetCh comme le C ...

[gb_68]

Bonjour,

en Pascal il existait ReadKey (qui renvoyait un caractère sans l'écrire dans la console). Mais sous Delphi, il n'y avait plus l'unité crt contenant cette fonction ... jusqu'à cet excellent post : Crt sous Delphi.
Testé, ReadKey fonctionne très bien ( j'ai juste du forcer un {$Define NEW_STYLES} dans l'unité crt ).

Sinon, on peut toujours utiliser les fonctions windows :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
  function GetCh : integer ; external 'msvcrt.dll' name '_getch';// n'écrit pas le caractère dans la console 
  function GetChEcho : integer ; external 'msvcrt.dll' name '_getche'; // écrit le caractère dans la console

[windob]

Merci de vos réponses mais en fait je viens de trouver la solution.

Bien qu'elle soit un peu compliquée, elle marche :
J'ai programmé une petite fonction qui lit directement les evenements sur la console a l'aide de l'API windows ReadConsoleInput.

C'est certes beaucoup plus compliqué mais ça me permet de gérer les touches spéciales comme les fleches, enter, delete, ...