Стоимость указана, чтобы вам было проще оценить примерные расходы на решение вашей задачи. Окончательную цену фрилансер сможет сообщить в личной беседе после уточнения деталей.
Модуль для Delphi в формате dcu. Демо-версия.
Скорость работы демонстрационной версии значительно ниже, чем в полной(полная версия по ссылке: http://www.wmcentre.net/des.php?idd=834596).
Функция для проверки e-mail:
function EmailValid(const Email: String; out Error: Boolean): Boolean;
где Email - e-mail адрес,
Error - ошибка функции: True - при исполнении функции произошла ошибка, False - без ошибок.
Если e-mail существует, то функция возвращает значение True, иначе - False.
Самый простой пример использования модуля с функцией:
uses EValid;
procedure TForm1.Button1Click(Sender: TObject);
var
Error: Boolean;
begin
if EmailValid(Edit1.Text, Error) then
Edit2.Text := 'Существует'
else
Edit2.Text := 'Не существует';
end;
www.wmcentre.net/des.php?idd=834596