Как преобразовать число (например 12) в строку типа "012"

← →
INTAARI (2004-03-19 14:41) [0]

Добрый день колеги!!!
У меня возникла необходимость преобразовать число целого типа в строку. Длинна строки 3 символа, причем если число занимает меньше символов, то оставшиеся заполняются нулем.
Например: число 6 ->"006"
число 12->"012"
Немогу выбрать подходящюю функцию, если она имеется, если нет то и так понятно как делать.

← →
Dimka Maslov © (2004-03-19 14:54) [1]

Проблема-то в чём? В нежелании хотя-бы поверхностно ознакомиться с языком программирования? Или мышление отсутствует? Или просто лень?

← →
Fay © (2004-03-19 14:58) [2]

Format("%3.3d", [6])

← →
Романов Р.В. © (2004-03-19 15:00) [3]

F1 - Format function

function FormatInteger(MaxDigits, Value: Integer): String;
begin
Result := StringOfChar("0", MaxDigits);
while (Value <> 0) and (MaxDigits > 0) do
begin
Result[MaxDigits] := char(Value mod 10 + byte(char("0")));
Value := Value div 10;
Dec(MaxDigits);
end;
end;

p.s. только для челых чисел >= 0

← →
INTAARI (2004-03-19 15:09) [5]

Извиняюсь проглядел!!!
Вопросов больше не имею.

Как преобразовать число (например 12) в строку типа "012" Найти похожие ветки