[Phantom_Drake]

de hecho si tengo dudas aun en la linea:

Código Delphi [-]
if not ExecRegExpr('[\w\d\-\.]+@[\w\d\-]+(\.[\w\d\-]+)+',edtMail0.Text) then

marca error en el ExecRegExpr
a ke se debe esto???