KB zu Bytes umwandeln

[Namenloser]

Zunächst wäre mal zu klären, was der Punkt bedeutet: Ist er ein Tausendertrennzeichen oder ein Dezimaltrennzeichen(Komma)?

[Valle]

Wenn es sich um einen Tausenderseperator handelt, dann einfach den Punkt durch einen Leerstring ersetzen.

Bei einem Fließkomma statt Int in einen Float umwandeln, der Punkt sollte dabei einfach bleiben wie er ist.

Ich gehe aber davon aus, dass es ein Tausenderseperator ist.

Liebe Grüße,
Valentin

[DrD0j0]

Vielen Dank für eure Antworten
Also es handelt sich um ein Fließkomma.
Ich habe mir folgende Funktion gebastelt:

Delphi-Quellcode:

function Kb2Byte(SrcKb: String): Int64;
var
  tmpSize: Double;
begin
  if TryStrToFloat(SrcKb, tmpSize) = True then
  begin
    Result := tmpSize*1024;
  end
  else begin
    Result := 0;
  end;
end;

Leider hapert es aber noch bei "Result := tmpSize*1024;".
Den Wert muss ich irgendwie noch in Int64 umwandeln...

[Klaus01]

Hallo,

wenn Du den Wert in Byte vorliegen hast, dann kann es keine Nachkommastelle mehr geben.
Du kannst diese also einfach abschneiden z.B. mit trunc.

Grüße
Klaus

[DrD0j0]

Vielen lieben Dank für die schnelle und kompetente Hilfe

[Hobby-Programmierer]

Delphi-Quellcode:

function Kb2Byte(SrcKb: String): Int64;
var tmpSize: Double;
begin
  Result := 0;
  if TryStrToFloat(SrcKb, tmpSize) then
    Result := Trunc(tmpSize *1024);
end;

[Namenloser]

Bin ich der einzige, der der Meinung ist, dass hier eine Exception ausgelöst werden sollte, wenn die Konvertierung fehlschlägt? Man sucht den Fehler nämlich hinterher u.U. ewig, wenn das Programm aus unerfindlichen Gründen bei manchen Dateien die falsche Dateigröße anzeigt...

Also wenn schon, dann so:

Delphi-Quellcode:

function Kb2Byte(SrcKb: String): Int64;
var tmpSize: Double;
begin
  if TryStrToFloat(SrcKb, tmpSize) then
    Result := Trunc(tmpSize*1024)
  else
    raise EConvertError.CreateFmt('"%s" is not a valid file size', [SrcKb]);
end;

Aber abgesehen davon, ist Aphtons Lösung die korrekte, da sie mit einbezieht, dass die Nachkommastellen nur bis 999 gehen, und nicht bis 1024.