si RecupContenu(ChampDeText) = 'password' alors Affiche('ok'); sinon Affiche('erreur'); fsi;
procedure TForm1.Button1Click(Sender: TObject); begin if Edit1.Text = 'password' then ShowMessage('ok') else ShowMessage('erreur'); end;
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question