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