Bytes in GB formatieren?

[Die Muhkuh]

Dreimal geteilt durch 1024 ergibt ein GB (wenn man mit einem Byte anfängt)

[mlspider]

Delphi-Quellcode:

FloatToStr(free_size / (3* 1024)) + #13 + 'total size=' +
FloatToStr(total_size / (3* 1024)))

Bringt zwar keinen Compilerfehler, dafür aber falsche Werte.

[Phoenix]

Zitat von Angel4585:

Zitat von Phoenix:

Teile doch einfach echt mit:
free_size / (3* 1024)

Warum soll er durch 3072 teilen?

ARGL.. jaaa.. ist ja gut... ich meinte 1024^3, mea culpa. Zu schnell getippt, zu wenig korrekturgelesen. Also mit Power potenzieren oder kurz selber ausrechnen: free_size / 1073741824.

[Phoenix]

Zitat von mlspider:

Delphi-Quellcode:

FloatToStr(free_size / (3* 1024)) + #13 + 'total size=' +
FloatToStr(total_size / (3* 1024)))

Bringt zwar keinen Compilerfehler, dafür aber falsche Werte.

Wenn Du den rest jetzt noch liest weisst Du, dass ich mich da mit dem *3 vertan habe und es hoch drei sein müsste...

Aber das ist Grundlegende Mathe.. da könnte man auch selber draufkommen...

[mlspider]

Das haut hin. Nur finde ich 12 Nachkommastellen doch ein wenig viel. 2 würden auch reichen.

[Die Muhkuh]

Round
RoundTo
FloatToStrF

[Zacherl]

FloatToStrF

Bisschen mehr Eigeninitiative ..

//Edit: Red box

[Angel4585]

Und jetzt noch ein Doppelpost das kost mindestens 2,5 Cent in Daniels Kaffeekasse

BTW:
ich würde
Format('%.2f GB',[freesize / Power(1024,3)]) nehmen

[Phoenix]

Erm.. sorry Mario, aber vielleicht solltest Du die Handbücher vor dem Verheizen auch mal kurz anlesen...

[ste_ett]

Zitat von TeronG:

(und evtl. mit RoundTo noch n bissl "Pimpen")