FoxPro/Visual FoxPro - agregar fecha auna caja de texto

   
Vista:
Imágen de perfil de ARNALDO

agregar fecha auna caja de texto

Publicado por ARNALDO acarrasco_cadena@hotmail.com (16 intervenciones) el 07/03/2015 03:50:29
TENGO UN PROBLEMA ESTOY UTILIZANDO VISUAL FOX 6.0 Y TENGO UN CONTOL DE FECHA OLE CONTROL Y QUIERO PONER LA FECHA DEL CALENDARIO EN UNA CAJA DE TEXTO

thisform.txtfecini.value = ctod(str(thisform.olefecini.day) ;
+ '/' + str(thisform.olefecini.month) ;
ENDPROC
NO ME FUNCIONA ESTE PROCEDIMIENTO LO COLOQUE EN EL CLICK EVEN REQUIERO UNA AYUDA
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

agregar fecha auna caja de texto

Publicado por Fidel José (558 intervenciones) el 08/03/2015 16:16:12
No sé cómo será tu código real. En lo que muestras te falta el año.

De todos modos, me parece más sencillo:
oControl=thisform.olefecini
thisform.txtFecini.Value= DATE( oControl.year , oControl.month , oControl.day )

La principal ventaja de usar la función DATE() es que no depende SET DATE TO, además de simplificar la escritura.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

agregar fecha auna caja de texto

Publicado por Gabriel (406 intervenciones) el 23/03/2015 03:29:45
Estimado Amigo :

Asumo que estas utilizando el DTPicker...

Aqui una forma :

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

Espero haber respondido a tu pregutna

saludos,

GABRIEL
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar