Discussion :

[gtaman]

bonjour,
voila j'aimerai pouvoir en gros arrêter mon programme afin d'attendre qu'on entre une réponse ou qu'on clique sur un bouton.

Je développe. Dans un Memo, une question s'affiche.
L'utilisateur doit répondre à cette question en cliquant sur le bouton 'Oui' ou 'Non' ou rempli une zone de texte puis clique sur 'Valider'

puis selon la réponse donnée, on appellera différente procédure.

Comment faire pour que mon programme, s'arrête avant l'interprétation, qu'il attende qu'on est répondu à la question !

Merci de votre réponse

[tourlourou]

utilise une boucle :

Code :

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

1
2
3
4
5
Bouton_OK:=False;
repeat
  Sleep(50);
  Application.ProcessMessages; // pour que l'appli traite les messages (boutons pressés, pe)
until Bouton_OK;

et code du bouton :

Code :

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

1
2
3
4
procedure Button1Click(...);
begin
  Bouton_OK:=True;
end;

je te laisse adapter pour plusieurs boutons...

[ero-sennin]

Salut,

Je ne sais pas si ce que je vais dire pour te correspondre, mais regarde du coté du InputBox ou InputQuery F1 sur ces mots pour savoir concrètement ce que font ces fonctions

En espérant t'avoir aidé
A+

EDIT:

D'après la réponse posée, je suis surement à coté de mes baskets là

[gtaman]

j'avais fait un repeat.. until aussi avec un sleep ! mais la fenetre se figeait, et impossible de cliquer sur un bouton, mais je connaissais pas "Application.ProcessMessages;", merci beaucoup ça marche niquel maintenant !

[tourlourou]

ero-sennin propose la solution : le reste n'est que bricolage...

[mengwei]

Salut,

euh par défaut, en programmation évenementielle, le programme ne fait rien tant que tu ne déclenches pas d'évenement non ? donc je ne suis pas bien sûr de comprendre le bien fondé de la question...

[ShaiLeTroll]

EDIT : Le Temps que je tape ma proposition, mengwei a pensé la même chose, ...

J'ignore comment fonctionne ton programme, mais avec une application pour windows, tu n'as pas besoin de te compliquer à attendre une réponse, c'est l'inverse qu'il faut faire, il faut gérer des messages ou implémenter des gestionnaires d'évèmenent ...

je suppose que c'est une sorte de questionnaire ou un jeu textuel ... donc tu as du faire un bouton démarrer et de la part une boucle ...

Pour me pas essaye MessageDlg de l'unité Dialogs,

EDIT 2 : Bon, j'ai modifié mon code, et il était en réponse parfaite pour un autre sujet ICI, donc j'édite mon message pour nettoyer un peu ici ...