Détecter une flèche avec ReadKey

Bonjour

J'exécute Turbo Pascal avec wine sous Ubuntu 12.10.

Code:

---

1 2 3 4 5

begin k := readkey; if k = #80 then writeln('sa marche'); end.

---

En principe, il affichera "ça marche" si on tape la flèche bas, n'est-ce pas ? 8O

Bonjour,

Malheureusement non, les flèches font partie des touches qui génèrent deux codes lorsqu'elles sont pressées : d'abord #0 puis #80. Il faut donc un double ReadKey.

;)

Xoa,

Oui, et un petit exercice consiste à s'amuser à utiliser ReadKey, et afficher la touche qui a été utilisée :
- si c'est un caractère affichable, l'afficher tel quel
- sinon, afficher son code et/ou son nom (par exemple, afficher LineFeed si code = 10).

:)

Citation:

---

Envoyé par Alcatîz

Bonjour,

Malheureusement non, les flèches font partie des touches qui génèrent deux codes lorsqu'elles sont pressées : d'abord #0 puis #80. Il faut donc un double ReadKey.

;)

---

Code:

---

1 2 3 4 5 6 7

begin k := readkey; if k = #0 then k := readkey; if k = #80 then writeln('ça marche'); end.

---

ça marche comme ça?
merci :)

Il y a plusieurs fils de discussion sur le forum qui abordent la question. Ce post est un bon résumé :
http://www.developpez.net/forums/d55...s/#post4351122