FoxPro/Visual FoxPro - guardar fecha

Hola !!, como hago para guardar una fecha clickeada en un calendario en una tabla.
Desde ya les agradesco su ayuda.
saludos.

Hola Analia.
Una forma sencilla sería tomando el calendario/agenda que tráe VFP, ésto lo podés hacer simplemente activando la ventana del mísmo

ACTIVATE WINDOW CALENDAR

El dia, seleccionado en el calendario, se guarda en la variable de sistema _DIARYDATE.

En el caso que quiera algo mas lindo podrías usar alguno de los siguientes calendarios:

http://www.portalfox.com/index.php?name=News&file=article&sid=2064&mode=nested&order=0&thold=0

saludos cordiales

Hola !!, estoy usando el ocx control calendar 11 que viene el Visual Fox Pro 8.
por lo tanto la fecha se debe guardar de otra forma.
les agradecere su ayuda.
saludos.

En Vp. 6.0

Thisform.tu_control_calendario.Object.Value

Buen dia,
mira yo uso el control nativo de VFP para las fechas y hago lo siguiente:

thisform.txtfecini.value = ctod(str(thisform.olefecini.day) ;
+ '/' + str(thisform.olefecini.month) ;
+ '/' + str(thisform.olefecini.year))

y asi me queda en ese TEXTBOX la fecha indicada en el calendario...

Saludos, espero que te sirva

Use al control DateTimePicker (un activeX que viene incluido por Microsoft por defecto en su sistema operativo)

y recoger el valor con la propiedad _value

Select MiTabla
Replace Fecha with thisform.oleFECHA._value

Asumiendo que tu control OCX en el formulario se llame oleFECHA, por ejemplo.

Amiga Analia :

Tomando la sugerencia de uno de los colegas, te recomiendo utices el control ocx Datetime and Picket que viene incluido en VFP sol oes cuestion de activarlo y añadirle algunos codigos...

Para tu pregunta exite mas de una forma como respuesta :

1) WITH Thisform.DTPicker
dFech_Nac = DATE(.Year,.Month,.Day) && Almacena la Fecha Registrada
ENDWITH

Para comprobar la fecha almacenada
******************************************
WAIT WINDOW "Fecha de Cumpleaños : " + DTOC(dFech_Nac) TIMEOUT .5

2) REPLACE(THIS.ControlSource) WITH THISform.DTPicker.Object.Value

3) Thisform.DTPicker.Object.Value = FECH_PRES

Espero haber respondido a tu pregunta.

Saludos,

Gabriel
(Lima-Perú)

PD : CUANDO INSERTAS DICHO OCX VFP LE ASIGNA EL NOMBRE DE OLECONTROL1 AHI ES DONDE LE PUEDES CAMBIAR DE NOMBRE AL DE DTPICKER...

Observación: al interactuar con el control DateTimePicker, deberás hacer con la propiedad _VALUE (con guión bajo al inicio) y no VALUE a secas, como acostumbramos.

Hola mi estimado, para preguntar porque cuando agrego este control DateTimePicker a una columna de una grilla soo se muestra cuando hago clic en lcolumna, pero si salgo de lla ya no muestra el control, a pesar que modifique la propiedad sparce de la columna y nada. Alguien tiene alguna solución para esto