TBigUInt - Noch ein Datentyp für große Zahlen

[himitsu]

würde es ein bissl beschleunigen, wenn nicht für jede Stelle mit der großen Zahl gerechnet würde
(praktisch die Umkehrung des IntToStr)

Delphi-Quellcode:

Result := 0;
i2 := 0;
i3 := 1;
for i := 1 to Length(n) do
begin
  if not (n[i] in ['0'..'9']) then
    raise EConvertError.CreateResFmt(@SInvalidInteger, [S]);
  i2 := i2 * 10 + (Ord(n[i]) - Ord('0'));
  i3 := i3 * 10;
  
  if (i3 = 1000000000) or (i = Length(n)) then
  begin
    Result := Result * i3 + i2;
    i2 := 0;
    i3 := 1;
  end;
end;

[edit] i2 durch i3 ersetzt (siehe gammatester)