Delphi y Pascal es lo mismo. Pero el algoritmo que usas no sirve.
Y que pasa si es uno "estesi@esvalido.com"?
Debes es armar un sistema de reglas que son comunes a todas las direcciones de correo. Como por ejemplo, que tiene un @, que antes hay esto y que despues esto.
Para ello, busca en internet como validar un correo electronico, veras muchos ejemplos.
|