Otra forma de hacerlo es
Código Delphi
[-]FormatFloat('00000000', 250);
El resultado es 00000250
También te puedes crear una función:
Código Delphi
[-]function GetIntToStrZero(Value: Integer): String;
begin
Result := FormatFloat('00000000', Value);
end;
Ejemplo:
Código Delphi
[-]...
var
X: String;
begin
X := GetIntToStrZero(250);
end;
Un saludo.