IsValid IPv4/IPv6

Zur Vorstellung von Komponenten und Units für Lazarus
Antworten
sstvmaster
Beiträge: 575
Registriert: Sa 22. Okt 2016, 23:12
OS, Lazarus, FPC: W10, L 2.2.6
CPU-Target: 32+64bit
Wohnort: Dresden

IsValid IPv4/IPv6

Beitrag von sstvmaster »

Anbei eine Unit mit RegEx mit folgenden Funktionen:

Code: Alles auswählen

function IsValidPrivateIPv4(aIP: String): Boolean;
function IsValidIPv4(aIP: String): Boolean;
function IsValidIPv6(aIP: String): Boolean;


Anregungen, Kritik erwünscht.
Dateianhänge
uipaddresshelpers.pas
(3.65 KiB) 238-mal heruntergeladen
LG Maik

Windows 10,
- Lazarus 2.2.6 (stable) + fpc 3.2.2 (stable)
- Lazarus 2.2.7 (fixes) + fpc 3.3.1 (main/trunk)

sstvmaster
Beiträge: 575
Registriert: Sa 22. Okt 2016, 23:12
OS, Lazarus, FPC: W10, L 2.2.6
CPU-Target: 32+64bit
Wohnort: Dresden

Re: IsValid IPv4/IPv6

Beitrag von sstvmaster »

Hier noch ein Demo dazu.
Dateianhänge
project1.zip
(127.83 KiB) 229-mal heruntergeladen
LG Maik

Windows 10,
- Lazarus 2.2.6 (stable) + fpc 3.2.2 (stable)
- Lazarus 2.2.7 (fixes) + fpc 3.3.1 (main/trunk)

Antworten