FMX.Edit.TCustomEdit.OnValidate
Delphi
property OnValidate: TValidateTextEvent read GetOnValidate write SetOnValidate;
C++
__property Fmx::Text::TValidateTextEvent OnValidate = {read=GetOnValidate, write=SetOnValidate};
Propriétés
Type | Visibilité | Source | Unité | Parent |
---|---|---|---|---|
event | public | FMX.Edit.pas FMX.Edit.hpp |
FMX.Edit | TCustomEdit |
Description
Se produit quand l'utilisateur a appuyé sur la touche Entrée ou quand la focalisation a quitté le contrôle.
Ecrivez un gestionnaire d'événement OnValidate pour valider les modifications saisies par l'utilisateur dans le contrôle d'édition avant la modification du texte.
Le gestionnaire d'événement OnValidate peut vérifier le texte fourni et, s'il n'est pas acceptable, il renvoie un message d'erreur ou d'avertissement.
Extraits de code
A titre explicatif, imaginez le scénario suivant : une application fournit une zone d'édition de texte conçue pour saisir une adresse de messagerie à partir du domaine mon_entreprise.com, par exemple John.Doe@mon_entreprise.com. Si l'utilisateur saisit un texte qui ne se termine pas par la sous-chaîne "mon_entreprise.com", l'application affiche un message d'erreur dans le contrôle d'édition.
Dans ce scénario, vous pouvez implémenter les gestionnaires d'événement OnValidate suivants :
procedure TForm1.Edit1Validate(Sender: TObject; var Text: string);
begin
if not EndsText('mycompany.com', Text) then
Text := 'Invalid email!'
end;
void __fastcall TForm1::Edit1Validate(TObject *Sender, UnicodeString &Text)
{
if (!EndsText("mycompany.com", Text)) { Text = "Invalid email!";
}
}
Remarque : Ces extraits de code utilisent la routine System.StrUtils.EndsText.