Функция проверки emal

[Fok]

Подскажите есть_ли функция для проверки правильноси синтаксиса вводимого
мыльника .
Например ,чтобы не было русских букв, присутствовала @ , длинна

наподобие

function checkemail($email) {
 // Проверка на правильность ввода
 $res=(!eregi("^[\._A-Za-z0-9-]+@[\.A-Za-z0-9-]+\.[a-z]{2,6}$", $email));
 // Проверка на наличие MX-записей
 list($mailbox, $domain)=split("@",$email);
 if(@getmxrr($domain, $mxhost)) { $res=true; } else { $res=false; }
 return $res;
 }

[Mad_Cat]

а самому написать? ничего же сложного!

function CheckMail(s:string):boolean;// проверка на русские буквы, @ и длину
var
i:integer;
begin
if pos('@',s)=0 then begin result:=false;exit;end; 
for i:=1 to length(s) do
if s[i] in ['А'..'Я','а'..'я'] then begin result:=false;exit;end;
if (length(s)<2) or (length(s)>128) then begin result:=false;exit;end; // вместо 128 любая ваша длина
result:=true;
end;

3. Не флудить. Флудом (пустой болтовней) считается все, не относящееся к теме. Здесь не чат, а форум серьезно увлеченных людей.
К флуду относится также:
- необоснованное (не требующееся по смыслу) цитирование предыдущего поста;
- размещение своих постов подряд друг за другом - пользуйтесь кнопкой "Правка" для изменения своего сообщения.
За флуд - автор поста получит нарушение №1 - "Флуд" и 2 очка штрафа.

[GunSmoker]

Кто сказал, что в мыле не может быть русских символов?

president@кремль.рф

А по понаставят проверок - alexeev.alexander@gmail.com хрень вобьёшь. А, часто ещё бывает, что первый домен требуют: employer@corporateserver им опять неугоден.

Что гарантировано можно сказать про мыло - там должен быть @ и только один. Всё остальное надо проверять аккуратно.