#EmailValidationPascal#
Dies ist ein Port von EmailValidation nach Delphi/Pascal.
Eine einfache (aber korrekte) Pascal-Klasse zur Validierung von E-Mail-Adressen.
Unterstützt internationalisierte E-Mail-Adressstandards (rfc653x).
Dieses Projekt wurde mit Delphi 10 Seattle Update 1 erstellt. Die Einheit ( uEmailValidation.pas
) sollte in jeder Delphi-Version ab 2009 und FreePascal 2.6.4 aufwärts kompiliert werden.
Wenn Sie XE3 Upwards verwenden und mit den Mobile
-Compilern arbeiten, in denen Zeichenfolgen standardmäßig nullbasiert sind, verwenden Sie bitte die Einheit ( uEmailValidationZeroBased.pas
) oder eine beliebige andere Einheit.
uEmailValidation.pas
) verwenden.###Codebeispiele
uses
SysUtils, uEmailValidation;
var
TestAddress : String;
begin
TestAddress := ' [email protected] ' ;
Validator := TEmailValidator.Create;
if TEmailValidator.Validate(TestAddress) then
begin
WriteLn( ' Valid Email Address ' );
ReadLn;
end
else
begin
WriteLn( ' Invalid Email Address ' )
ReadLn;
end ;
end ;
For International Addresses
uses
SysUtils, uEmailValidation;
var
TestAddress : String;
begin
TestAddress := ' θσερ@εχαμπλε.ψομ ' ;
if TEmailValidator.Validate(TestAddress, True) then
begin
WriteLn( ' Valid Email Address ' );
ReadLn;
end
else
begin
WriteLn( ' Invalid Email Address ' )
ReadLn;
end ;
end ;
###Unit-Tests
Unit Tests can be found in EmailValidation.Test Folder.
The unit tests makes use of DUnitX and TestInsight.
###Lizenz
Diese „Software“ ist unter MIT License (MIT)
lizenziert.
1MhFfW7tDuEHQSgie65uJcAfJgCNchGeKf
0x6c1DC21aeC49A822A4f1E3bf07c623C2C1978a98
345367-40
###Abschluss
Besonderer Dank geht an Jeffrey Stedfast für diese großartige Bibliothek. (Vielen Dank an die Entwickler von DUnitX Testing Framework und TestInsight für die Entwicklung von Tools, die Unit-Tests vereinfachen.