Also die einfachste (aber wahscheinlich nicht die schnellste) wird die hier sein:
Delphi-Quellcode:
function IntToStr(AValue: Integer; ABase: Byte = 10): String;
var
i: Integer;
begin
Result := IfThen(AValue < 0, '-', '');
repeat
Result := Result + AValue mod ABase;
AValue := AValue div Base;
until AValue = 0;
end;