Einzelnen Beitrag anzeigen

DrD0j0

Registriert seit: 1. Mai 2011
10 Beiträge
 
#6

AW: KB zu Bytes umwandeln

  Alt 2. Jun 2011, 14:20
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...
  Mit Zitat antworten Zitat