REPEAT
UNTIL keypresseD; ou UNTIL keypressed AND (Readkey = #27);
c'est du pascal traditionnel, pascal objet (delphi) offre d'autre possibilités de gerer les touches enfoncées, c'est tout l'interet de la POO.
PS : le #27 c'est la touche escape, utilisée pour l'exemple c'est tout.
Message édité par kamoshoa le 02-04-2004 à 14:37:49