Mot de passe pour mon application.

Fermé
meksam Messages postés 37 Date d'inscription mardi 8 juillet 2014 Statut Membre Dernière intervention 3 décembre 2018 - Modifié par meksam le 24/01/2016 à 11:26
meksam Messages postés 37 Date d'inscription mardi 8 juillet 2014 Statut Membre Dernière intervention 3 décembre 2018 - 1 févr. 2016 à 09:41
Bonjour,

Mon souci est le suivant:

Je veux tout simplement ajouter un mot de passe sur une fiche (Form) qui démare avant l'application que je développe, mais le problème c'est que je ne sais pas ou taper le code du bouton qui compare le mot de passe saisie dans Edit1.text avec le vrais mot de passe.

Le nom de la fiche qui demande de mot de passe est : Fpassword
J'ai essayé le code suivant en le tapant dans : Projet----> View Source

begin
Application.Initialize;
Application.CreateForm(TFpassword, Fpassword);
if Fpassword.validerClick(Sender) then // validerClick normalement c'est l'appelle //de l'évenement OnClick du bouton Valider
if RzEdit2.text=rzedit1.Text then // ici le test du text tappé
begin
FSplash := TFSplash.Create(Application);
FSplash.Show;FSplash.Update; //-------------
Application.CreateForm(TPrincipale, Principale);
Application.CreateForm(TAjouModif, AjouModif);
Application.CreateForm(TFdirection, Fdirection);
Application.CreateForm(TFEtat, FEtat);
Application.CreateForm(TFLangue, FLangue);
Application.CreateForm(TFSalle, FSalle);
Application.CreateForm(TFTypeArchive, FTypeArchive);
Application.CreateForm(TFAMTypeArchive, FAMTypeArchive);
Application.CreateForm(TFAMDirection, FAMDirection);
Application.CreateForm(TFAMSalleArchive, FAMSalleArchive);
Application.CreateForm(TFAMEtatArchive, FAMEtatArchive);
Application.CreateForm(TFAMLangueArchive, FAMLangueArchive);
Application.CreateForm(TFSupArchive, FSupArchive);
Application.CreateForm(TFermer, Fermer);
Application.CreateForm(TFSearch, FSearch);
//Application.CreateForm(TFpassword, Fpassword);
Application.CreateForm(TFLocalisation, FLocalisation);
Application.CreateForm(TFSERCH1, FSERCH1);
Application.CreateForm(TFApropos, FApropos);
FSplash.Close;FSplash.Release;//-------------
Application.Run;
end
else
Application.Terminate;
end.

Qand je compile je reçois les mesages d'erreurs:
Undeclared identifier : 'validerClick'
Undeclared identifier : 'Sender'
Undeclared identifier : 'RzEdit2'

Quelqu'un pourrait me corriger mon code? merci...
A voir également:

1 réponse

meksam Messages postés 37 Date d'inscription mardi 8 juillet 2014 Statut Membre Dernière intervention 3 décembre 2018 2
25 janv. 2016 à 08:31
Quelqu'un pourrait me corriger le code? SVP.
1
meksam Messages postés 37 Date d'inscription mardi 8 juillet 2014 Statut Membre Dernière intervention 3 décembre 2018 2
1 févr. 2016 à 09:41
Quelqu'un pourrait me corriger le code? SVP.
0