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