11-16-2019, 04:11 PM
(This post was last modified: 11-16-2019, 04:18 PM by ShaneStump.)
(11-16-2019, 04:07 PM)cprmlao@hotmail.com Wrote: This is not a IW question.Thanks - I will give that mask a try!
But you can try:
var input, string;
valid_email:boolean;
begin
s := '^(([^<>()\[\]\.,;:\s@\"]+(\.[^<>()\[\]\.,;:\s@\"]+)*)|(\".+\"))@(([^<>()[\]\.,;:\s@\"]+\.)+[^<>()[\]\.,;:\s@\"]{2,})$';
input:='MSG-8b17fa92-7b35-4fdb-9f18-f8a69252e019+BR-999999999@expmessaging.tripadvisor.com';
valid_email:=TRegEx.IsMatch(input, s, [roIgnoreCase])
end;
As far as it not being an IW question, maybe not directly, but indirectly I would say it is for a lot of people. All the IW apps I write send e-mail in one way or another.
All the best,
Shane
P.S. Ok - I tried the mask and it works for the e-mail address I gave but it doesn't work for simpler e-mail addresses. I am looking for a mask that will validate as many e-mail addresses as possible including the aforementioned one.