hi leutz,
mein probelm ist, dass ich zwar von byte in Kilobyte und Megabyte problemlos umrechnen kann, aber das selbe prinzip mit Gigabyte nicht klappt.
(hierzu meinen Quelltext)
Delphi-Quellcode:
function gbyte(byt: Int64):String;
var
ergebnis : Comp;
gb: Comp;
s, s1 : String;
begin
if byt > 1073741823 then begin
gb := byt /1073741824;
str(gb:7:2,s);
Result := s;
end
else begin
ergebnis := byt / 1048576;
str(ergebnis:7:2,s1);
Result := s1;
end;
end;
(aufruf)
Edit4.Text := gByte(StrToInt(Edit1.Text));
diese Function soll einen wert(der in Byte angegeben wird) in gigabyte umrechnen, nur das klappt nicht, weil ich dann immer diese meldung bekomme:
(bsp.: )
Zitat:
'6328541184' ist kein gültiger Integerwert.
Meine Frage ist nun:
1. wieso kommt der fehler
2. was mach ich falsch
(ich hab es schon mit zisch varianten versucht, klappte einfach bisher net
)