hi,
ich habe z.B. einen schlüssel x mit dem DateiTyp "Reg_DWord".
X soll nun z.B. den Dezimalwert 6676940 haben.
Wie komme ich auf die rechnung das dieser wert 2424,45 MB ist?
Ich meine mit funktionen wie :
Delphi-Quellcode:
function TUtils.FormatFileSize(aSize: INT64): string;
const
MB = Int64(1024 * 1024);
GB = Int64(1024 * MB);
TB = Int64(1024 * GB);
PB = Int64(1024 * TB);
cSize : array [0..5] of Int64 = (1, 1024, MB, GB, TB, PB);
cLabel : array [0..5] of string = ('B', 'KB', 'MB', 'GB', 'TB', 'PB');
var
lIndex : Integer;
begin
lIndex := Ord(aSize >= cSize[1]) + Ord(aSize >= cSize[2]) + Ord(aSize >= cSize[3]) + Ord(aSize >= cSize[4]) + Ord(aSize >= cSize[5]);
Result := Format('%g %s', [Int(100.0 * aSize / cSize[lIndex]) / 100, cLabel[lIndex]]);
end;
komme ich nicht weiter, kann mir einer helfen???
Meine vermuting ist das ich die Dezimalzahl irgendwie mit "Format" zurecht formatieren soll...jedoch habe ich bis jetzt nicht
richtig die Formatierung verstanden.
Danke fürs lesen.