eine Zeichenkette aus einem Integer 'erstellen'

[Dax]

Delphi-Quellcode:

var i: integer; s: string;

s := '';
while i <> 0 do begin
  s := s + chr(i mod 252);
  i := i div 252;
end;