Thema: Delphi Gültige EMail Adresse

Einzelnen Beitrag anzeigen

CalganX

Registriert seit: 21. Jul 2002
Ort: Bonn
5.403 Beiträge
 
Turbo Delphi für Win32
 
#3

Re: Gültige EMail Adresse

  Alt 10. Feb 2005, 17:46
Von den Usern chris und Steve kommt noch folgende Möglichkeit unter Verwendung von regulären Ausdrücken. Eine mögliche Komponente für die Verwendung von regulären Ausdrücken (Delphi bietet von Haus aus dafür keine Möglichkeit) findet man hier.
Delphi-Quellcode:
uses RegExpr;

function IsEMailValid(eMail: string): boolean;
begin
  Result := ExecRegExpr('[\w\d\-\.]+@[\w\d\-]+(\.[\w\d\-]+)+', eMail)
end;
Chris
  Mit Zitat antworten Zitat