Sacar los números del 1 al 9 con dos digitos

[[David]]

Hola

Tengo esto :

Código Delphi [-]
var
 mes : String;
For i:=1 to 12 do
begin
 mes := IntToStr(i);
end;

el resultado será :
mes = 1;
mes = 2;

mes = 12,

quiero que todos los números tengan dos digitos, que quede así:

mes = 01;
mes = 02
....
mes = 12


Hay alguna instrucción rápida para hacer esto.

Un saludo

[Durbed]

Solo se me ocurre algo asi

Código Delphi [-]
var
 mes : String;
For i:=1 to 12 do
begin
 mes := IntToStr(i);
 If length(mes) = 1 Then
  mes := '0' + mes;
end;

[[kuan-yiu]]

FormatFloat('00', i);

[jachguate]

Código Delphi [-]
  Label1.Caption := Format('%2.2d', [Mes]);

Hasta luego.

[[jcarteagaf]]

Prueba lo siguiente:

Código Delphi [-]
var
 mes : String;
For i:=1 to 12 do
begin
  mes := Format('%.2d',[ì]);
end;

jachguate te dio la respuesta, pero yo lo acomode a tu codigo
y el %.2d no es error, ese tambien te dara 2 digitos con 0 por delante.
Saludos