Inputbox [Résolu]

Ali_usto 135 Messages postés lundi 20 novembre 2006Date d'inscription 11 octobre 2010 Dernière intervention - 25 mai 2007 à 20:22 - Dernière réponse : Ali_usto 135 Messages postés lundi 20 novembre 2006Date d'inscription 11 octobre 2010 Dernière intervention
- 25 mai 2007 à 23:56
Salut tout le monde , voila j'utilise des inputbox dans mon programme beaucoup .
mon probleme est le suivant  kand je fait appel a un inputbox et je rempli le champd de saisie , alors si je fais ok  c'est bon la tache s'execute normalment , mais meme quand je fais annuler la tache s'execute de la meme façon comme si j'ai fait ok
  voila un ptit exemple de mon code

procedure Tfessence.Image2Click(Sender: TObject);
var
 ch,ch2:string;
begin
 ch:=InputBox('Nom de la ville', 'Entrer le nom de la ville :', '');
 if essence.Edit1.Text='0' then
  begin
     ch2:=requete.Memo1.Text;
   Insert('  ville,',ch2, 139);
    requete.memo1.Text:=ch2;
.....
    ...
....
.
.....

end;
donc si je fais ok ou bien annuler  dans la inputbox y a la meme chose ki se passe meme si je n'ai rien taper....
je conte sur votre aide
  merci  d'avance.                         Ali
Afficher la suite 

2 réponses

Répondre au sujet
Cirec 4217 Messages postés vendredi 23 juillet 2004Date d'inscription 3 avril 2018 Dernière intervention - 25 mai 2007 à 20:48
+3
Utile
Salut,

essaye avec InputQuery:

If InputQuery('Nom de la ville', 'Entrer le nom de la ville :',  ch) ThenBegin
   // Ici le code qui doit s'executer si Ok
End;

 
@+
Cirec

<hr size="2" />
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de Cirec
Ali_usto 135 Messages postés lundi 20 novembre 2006Date d'inscription 11 octobre 2010 Dernière intervention - 25 mai 2007 à 23:56
0
Utile
Merci Cirec ça a  l'air de bien marcher 
 a la prochaine
Commenter la réponse de Ali_usto

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.