Byte --> Kb/Mb/Gb

[jaenicke]

Also ich mache das einfach so...

Delphi-Quellcode:

function FormatDiskSpaceSize(const ASize: Int64): string;
const
  cBinaryPrefixes: array[0..8] of String = ('', 'Ki', 'Mi', 'Gi', 'Ti', 'Pi', 'Ei', 'Zi', 'Yi');
var
  LogValue: Integer;
begin
  LogValue := Floor(Math.LogN(1024, ASize));
  Result := FloatToStrF(ASize / Math.Power(1024, LogValue), ffFixed, 12, 2) + ' ' + cBinaryPrefixes[LogValue] + 'B';
end;

// EDIT:

Zitat von Medium:

Quasi, weil es imho von nahezu allen Standardisierungsorganisationen so anerkannt wird, aber eine formelle Norm gibt es glaube ich nicht.

Doch gibt es:
IEC 80000-13:2008