Discussion :

[camlienne]

Bonjour,

pour savoir si ma touche p est appuyée je fais:

Code :

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

1
2
let e = wait_next_event[Poll; Key_pressed] in 
if e.key='p'

et ensuite je décide de faire plusieurs actions.

Seulement, ces actions se répètent à chaque fois
alors il faudrait que je puisse réinitialiser e.keypressed à la valeur false
pour dire que ma touche n'est plus appuyée.

j'ai cherché dans le manuel d'Ocaml et su internet mais je ne trouve rien.
comment faire ?

[gasche]

Tu devrais utiliser plutôt key_pressed (unit -> bool) et read_key (unit -> char, bloque si key_pressed vaut false, en attendant qu'une touche soit enfoncée) si tu ne t'intéresses qu'au clavier. Je crois que le problème que tu observes vient de "Poll", qui retourne immédiatement même s'il ne s'est rien passé de nouveau.

[camlienne]

en fait c'est dans un graphe ou je fais bouger plusieurs pions à la fois
et quand je tape sur la touche p je dois suivre la trace du pion courrant,
donc l'attente du nouvel évènement doit être non-bloquant et je dois utiliser Poll. Ensuite comme je ne sais pas réinitialiser l'évènement, la touche est toujours considérée comme appuyée donc j'ai la trace de tous mes points et pas seulement le point courant.

[gasche]

Pour que read_key () ne soit pas bloquant il suffit de vérifier que key_pressed () vaut true avant de demander read_key () (et sinon, d'attendre en continuant à gérer ton truc).

Sinon, tu aurais un exemple de code pas trop long, montrant le comportement que tu observes, pour qu'on puisse tester et corriger directement ? C'est sans doute le plus simple.

[camlienne]

ok merci, ça marche bien

Code :

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

1
2
3
4
5
6
if key_pressed() then
		begin
			match read_key() with
			'p'->.....
			|_->()
		end;

et le pbm s'est envolé!

heureusement parce que j'aurai eu du mal à vous donner un morceau de code pas trop long.