Validar se e-mail existe

Question

Gostaria de validar se o conteudo do campo � um e-mail, e se este e-mail e existe.OBS. Uso Delphi 7Agrade�o,Carlos...

Lucas Silva · Answer

Saber se o e-mail existe eu acho meio dif�cel..

eu valido os e-mail�s assim:

procedure TUtilitario.ValidaEmail(email: String);
begin
  if email <> �� then
   if pos(�@�, email) = 0 then
     raise EDadoInvalido.Create(email + � n�o � um e-mail v�lido!�);
end;

Lucas Silva · Answer

Corrigindo o c�digo ai.[code:1:0534ffb028]procedure TForm1.ValidaEmail(email: String);begin  if email <> �� then   if pos(�@�, email) = 0 then     ShowMessage(email + � n�o � um e-mail v�lido!�);end;[/code:1:0534ffb028]...

F�rum Validar se e-mail existe #211349