RES: [delphi-br] Função Que Valida E-mail

Estimado, Saudações. Você fez uma busca rápida por aí (google mesmo). Achei isso: function ValidaEmail(sEmail: string): boolean; const // Caracteres válidos ATOM_CHARS = [#33..#255] - ['(', ')', '<', '>', '@', ',', ';', ':', '\', '/', '"', '.', '[', ']', #

RES: [delphi-br] Função Que Valida E-mail

um colega postou a um tempo atras... function ValidaEmail(email: string): boolean; // Retorna True se o endereço de e-mail for válido const // Caracteres válidos em um "atom" atom_chars = [#33..#255] - ['(', ')', '<', '>', HYPERLINK "mailto:'@'"'@', ',', ';', ':',