FoxPro/Visual FoxPro - Pasar un Display a un text?

 
Vista:
sin imagen de perfil

Pasar un Display a un text?

Publicado por neo (1604 intervenciones) el 28/02/2007 19:30:26
Saludos,

Pregunta como pasa un display a un textbox.

Lo que quiero es guardar es el dia en letra de una fecha ingresada.

algo asi como esto:

STORE {^1998-02-16} TO gdDate
CLEAR
? CDOW(gdDate) && Displays Monday

Y lo que quiero es dar el valor "Monday" a un textbox para guardar en tabla


Gracias de Antemano..
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
sin imagen de perfil

RE:Pasar un Display a un text?

Publicado por Ernesto Hernandez (4623 intervenciones) el 28/02/2007 23:13:25
en el value del Text puedes poner =CDOW(DATE())

o en el Init de la forma

Thisform.txtDia.Value=CDOW(DATE())

Suerte
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
sin imagen de perfil

RE:ya quedó...

Publicado por neo (1604 intervenciones) el 01/03/2007 18:20:07
Gracias Ernesto te debo una...

Asi es como quedó:

Thisform.dia_l.Value=CDOW(Thisform.fecha.Value)
DO case

Case Thisform.dia_l.Value="Monday"
Thisform.dia_e.Value="Lunes"

Case Thisform.dia_l.Value="Tuesday"
Thisform.dia_e.Value="Martes"

Case Thisform.dia_l.Value="Wednesday"
Thisform.dia_e.Value="Miercoles"

Case Thisform.dia_l.Value="Thursday"
Thisform.dia_e.Value="Jueves"

Case Thisform.dia_l.Value="Friday"
Thisform.dia_e.Value="Viernes"

Case Thisform.dia_l.Value="Saturday"
Thisform.dia_e.Value="Sabado"

Case Thisform.dia_l.Value="Sunday"
Thisform.dia_e.Value="Domingo"

ENDCASE

Sencillo...por ultimo, para guardar el nombre del dia, solo lo agregé al botón guardar.

Gracias.
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