Hay algo para poner los días y meses en español

Hola amigo, yo para resolver este problema, sin necesidad de bajar algo cree mi propia funcion que me devuelva el mes en español, le envio como parametro la fecha y me devuelve el mes en español asi:
xMesEnEsapañol =  mes(date())
 
 
function mes(xLaFecha)
xRetorno = 'ENERO'
do case
   case month(xLaFecha)=2
     xRetorno = 'Febrero'
   case month(xLaFecha)=3
      xRetorno = 'Marzo'
         .
       .
     .  y asi sucesivamente hasta 12 - diciembre
endcase
return(xRetorno)
 
 
Y listo, hay formas de solucionar esto utilizando un archivo de runtime de fox del español, pero nunca me preocupe en bajarlo, pero si eres suscripto de msdn tal vez no sea complicado bajar el runtime en español.
Un saludo

Hola, asi es, pero de todas formas cualquier funcion que estas llamando es lo mismo,  ejecuta un pedazo de codigo y luego devuelve el resultado, no hay diferencias, pero te cuento en donde se origina el problema, Mira lo que pasa es lo siguiente.. cuando distribuis tu programa el fox incluye en el system32 del windows el archivo Vfp6renu.dll que pertenece al idioma ingles, el de español es Vfp6resn.dll, lo que puedes hacer es borrar el archivo de idioma ingles y listo, al no existir el archivo del idioma ingles, el sistema toma por defecto el del español siempre y cuando lo tengas, la distribucion o los instaladores que creas haran esto.
Un saludo