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'
