validar un dbedit

[jhonny]

La idea de el combobox sería buena en el caso de que las personas solo pudieran tener su correo en los servidores de tu lista y la concatenación al igual que en FOX es con el signo mas (+)...
Pero si yo quisiera hacer eso sin restringir el tipo de servidor al que las personas deban estar "afiliados" seria buscando la arroba y el punto en la cadena que escriban las personas así:

Código Delphi [-]
if (Pos(Edit1.Text, '@') <> 0) then
  if (Pos(Edit1.Text, '.') <> 0) then
  begin
    //Hago lo que tenga que hacer... 
  end;

Esa puede ser una manera de validar la cosa, pero me supongo que deben haber muchisimas mas..