Unit WebUtils 1.2.2

[himitsu]

Delphi-Quellcode:

function CalcDLTime(const Size: extended; const Units, Speed: integer): TTimeRec;
function BitToByte(const Bits: extended): extended;
function ByteToBit(const Bytes: extended): extended;

ich würde da von Extended auf Integer umstellen, denn halbe Bytes gibt's ja nicht, vorallem nicht bei einer Dateigröße

bei BitToByte/ByteToBit kann man dann auch schön nur noch mit SHL/SHR arbeiten.

z.B.:

Delphi-Quellcode:

Byte := (Bit + 7) shr 3;

Bit := Byte shl 3;