Interface
black light
Messages postés
29
Date d'inscription
Statut
Membre
Dernière intervention
-
black light Messages postés 29 Date d'inscription Statut Membre Dernière intervention -
black light Messages postés 29 Date d'inscription Statut Membre Dernière intervention -
bonjour,
Alors je dois faire une fenêtre sur la quelle il y a un nom d'utilisateur et un mot de passe. En cas d'erreur il y a possibilité de ressayé 3 fois seulement avant que la fenêtre ne se referme.
voici mon programme "la boucle ne marche pas le nombre d'essai n'est pas limité":
Alors je dois faire une fenêtre sur la quelle il y a un nom d'utilisateur et un mot de passe. En cas d'erreur il y a possibilité de ressayé 3 fois seulement avant que la fenêtre ne se referme.
voici mon programme "la boucle ne marche pas le nombre d'essai n'est pas limité":
var
i:integer;
begin
if (edit1.Text='lou') and (edit2.Text='bdd')
then
begin
showmessage('mot de passe correcte');
form2.Show;
end
else
begin
showmessage('le mot de passe ou le nom d''utilisateur est incorrecte');
for i:=0 to 3 do
begin
edit1.Text:=''; edit2.Text:='';
end
end
end;
end.
A voir également:
- Interface
- Common interface 5v only - Forum TNT / Satellite / Réception
- Interface netflix - Accueil - Streaming
- Interface gmail - Guide
- Akamai netsession interface ✓ - Forum Réseaux sociaux
- Interface snapchat - Accueil - Réseaux sociaux
2 réponses
il faux le faire avec une label (a)
apres ajouté une variable (n) qui calcul le nombre de tentative
donc tu donne une valeur initiale n:=0;
en cas de faux mot de passe
n:=n+1;
a la fin
if n<3 then
begin
n:=n+1;
showmessage ('mdp erroné il vous reste ',3-n,' tntative');
goto a; (il retourne a la saisie de mdp)
end
else
application.terminate;
enfin je vais faire un programe exacte et je vais le poster dans les deux jour prochaines, promis
apres ajouté une variable (n) qui calcul le nombre de tentative
donc tu donne une valeur initiale n:=0;
en cas de faux mot de passe
n:=n+1;
a la fin
if n<3 then
begin
n:=n+1;
showmessage ('mdp erroné il vous reste ',3-n,' tntative');
goto a; (il retourne a la saisie de mdp)
end
else
application.terminate;
enfin je vais faire un programe exacte et je vais le poster dans les deux jour prochaines, promis
