Integer --> null vor zahl?

[LoRd-MuldeR]

Ich würde mir für diesen Zweck ne kleine Hilfs-Funktion basteln:

Delphi-Quellcode:

function MyIntToStr(Value:Integer; Digits:Integer):String;
begin
  Result := IntToStr(Value);
  while Length(Result) < Digits do
    Result := '0' + Result;
end;

MyIntToStr(1, 4) = '0001';