Unit WebUtils 1.2.2

[Brainstalker]

WebUtils Version 1.2.2

Ich habe mal die eine oder andere Funktion gebraucht und mit der Zeit sind es ein paar geworden. Ich dachte ich packe mal alle zusammen in eine Unit und veröffentliche sie hier.
Ob sie der eine oder andere benötigt weiß ich nicht, aber hier ist sie.

Man kann beispielsweise die Downloadzeit bestimmen (angabe in Bit/s), eine URL decodieren/encodieren oder eine URL zerlegen lassen (ohne API-Aufruf).

Ich hab versucht so wenig Units wie möglich zu benutzen. Sinn ist es eine Unabhängige Unit zu haben die nicht mit API Aufrufen arbeitet, damit man diese auch auf anderen Betriebssystemen benutzen kann.

Würde mich über Kritik und Verbesserungsvorschläge freuen.

Funktionsübersicht / Features

Delphi-Quellcode:

function EncodeURL(const URL: string): string; // RFC 1738
// Ersetzt Sonderzeichen in URLs durch Hexcodes

function DecodeURL(const URL: string): string; // RFC 1738
// Ersetzt die Hexcodes in URLs durch Zeichen

function IsValidIp(const IP: string): boolean; // IPv4
// Prüft eine IPv4 Adresse auf Gültigkeit

function IsValidIpv6(const IP: string): boolean; // incomplete
// Prüft eine IPv6 Adresse auf Gültigkeit

function CalcDLTime(const Size: int64; Units, Speed: integer): TTimeRec;
// Berechnet die Downloadzeit anhand Geschwindigkeit und Downloadgröße

function BitToByte(const Bits: int64): int64;

function ByteToBit(const Bytes: int64): int64;

function ChangeUnit(const Value: integer; const uFrom, uTo: integer): extended;
// Ändert von einer Bytegröße zu einer anderen (z.B. MB -> KB)

function GetURLComponents(const URL: string): TURLRec;
// Gibt eine URL in Einzelteilen zurück

History

- 1.2.2 (2011-04-01)
Bugfix: IsValidIpv6, Region at start is now
recognized

- 1.2.1 (2011-01-17)
Update: IsValidIpv6

- 1.2 (2011-01-14)
Changed some functions to int64 input to support
larger numbers
Add: IsValidIpv6 function (incomplete)
Bug: IsValidIp now checks last block