E-Mail Validate??

[cprmlao@hotmail.com]

This is not a IW question.
But you can try:

Code:

var input, s: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;