Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- // uses RegularExpressions;
- function ValidateEmail(const emailAddress: string): Boolean;
- var
- RegEx: TRegEx;
- begin
- RegEx := TRegex.Create('^[a-zA-Z0-9_.+-]+@[a-zA-Z0-9-]+\.[a-zA-Z0-9-.]*[a-zA-Z0-9]+$');
- Result := RegEx.Match(emailAddress).Success;
- end;
Add Comment
Please, Sign In to add comment