FoxPro/Visual FoxPro - como asigno la fecha del sistema objeto Calendar

como le asigno la fecha actual al obejeto ole Calendar cuando lo inicio

Imaginemos que se llama Olecontrol1 y esta en el form.

Thisform.Olecontrol1.Object.Day = day(date())
Thisform.Olecontrol1.Object.month = Month(date())
Thisform.Olecontrol1.Object.year = year(date())

pon la propiedad Value=DATE()

Para que funcione tienes que hacerlo asi
Thisform.olecontrol1.object.value =DATE()

es correcto .
esa era la idea