code delphi + touche clavier

[invite3c59dc04]

Salut,

je ne trouve pas le code pour arrêter une boucle avec une touche du clavier. comment fait-on également pour faire une condition sur l'appui de 2 boutons ? j'utilise delphi6

merci
-----

[invite3d7be5ae]

Bonjour

Un

if a.OnClick then break;

ne peut il pas faire l'affaire? Sinon, dans une procédure à l'appel de OnClick, tu mets une variables à true que tu testeras dans la boucle. (Il faut initialiser la variable à false avant)
Pour 2 clicks, il y a soit a.DoubleClick soit un autre pour click gauche et clik droit, mais je n'ai plu fais de Delphi depuis longtemps, donc ma syntaxe peu-être fausse.

Pole, en espérant avoir répondu à ta question.

[Urbinou]

Salut,

je ne trouve pas le code pour arrêter une boucle avec une touche du clavier. comment fait-on également pour faire une condition sur l'appui de 2 boutons ? j'utilise delphi6

merci

Salut,

Mets une variable boolean en private que tu initialises à false avant ta boucle. Dans ta boucle, teste cette variable :

if lTest THEN BREAK ;

Dans l'événement OnKeyPress de ta fenêtre, teste si c'est la touche que tu attends et si oui, mets ta variable à true.
Dans les propriétés de ta fenêtre, il te sera peut-être nécessaire de positionner KeyPreview à true.

A ta disposition pour plus d'infos !