FoxPro/Visual FoxPro - ayuda con RETURN

 
Vista:

ayuda con RETURN

Publicado por EDWIN ARTURO (1 intervención) el 10/07/2007 17:27:07
HOLA AMIGOS DEL FORO AL QUE ME PUEDA AYUDAR SE LO AGRADESCO, LO QUE ESTOY HACIENDO ES LO SIGUIENTE :
EL USUARIO DEBE INTRODUCIR LOS DATOS DE
FECHA
HORA
CLAVE.
LO QUE QUIERO ES QUE LLENE LOS CAMPOS EN ORDENAMENTE POR EJEMPLO PRIMERO LA FECHA,DESPUES LA HORA Y ASI SUSECIVAMENTE QUIERO UTILIZAR EL COMANDO RETURN PERO NO SE EN QUE PARTE SE DEBE PONER ESTE
LO QUE INTENTE FUE LO SIGUIENTE

thisform.i_passwd.Value=""
thisform.i_passwd.SetFocus
RETURN .f.

PERO ME MARCA UN ERROR EN EL TIPO DE OPERADOR
POR SU AYUDA GRACIAS
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

RE:ayuda con RETURN

Publicado por Manuel medina (332 intervenciones) el 10/07/2007 17:35:45
Aludo amigo,

El setFocus no funciona el el valid, debe usarlo en el LostFocus o prueba en otro eveto

Espero te haya ayudado
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

para manuel medina

Publicado por edwin arturo (2 intervenciones) el 10/07/2007 17:50:41
gracias amigo manuel , pero tengo una pregunta para poner la condicion de que mi text esta "vacio" estoy poniendo lo siguiente
text1.value="" si esta bein como estoy manejando
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:para manuel medina

Publicado por neo (1604 intervenciones) el 10/07/2007 19:58:39
Thisform.text1.value="" &&Si el valor es alfanumerico
Thisform.text1.value=0 &&Si el Valor es numérico

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

RE:para manuel medina

Publicado por Manuel medina (332 intervenciones) el 10/07/2007 23:02:52
Saludo amigo

Claro que si

if thisform.text1.value = " "

else

endif

Cualquier cosa tirame,si puedo ayudarte no hay problema

adios
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:ayuda con RETURN

Publicado por neo (1604 intervenciones) el 10/07/2007 19:57:13
En el Valid del Password:

Select Usuarios && La tabla se llama Usuarios
Locate for upper(password)=upper(alltrim(Thisform.text1.value))
If found() then
else
wait window "Password Incorrecto, intente de nuevo" timeout .8
Thisform.i_passwd.value="" &&Borra datos ingresados
return 0
endif

Note;
Me imagino que quieres validar el password, y si es incorrecto que regrese para ingresar un nuevo password.

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

RE:ayuda con RETURN

Publicado por Gabriel (112 intervenciones) el 12/07/2007 03:46:19
Hola amigo:

lo que debes hacer es muy simpe
Dices q primero el usuario debe ingresar la fecha, la hora , la clave ylo demas verdad?

bueno,
supongamos que el bojeto que almacena la fecha, hora clave.....es un text

Para la fecha: txtfecha
Para la hora: txthora
Para la clave: txtclave.... ok

Loque debes hacer es:

Si estas travajando con VFP 9:

Objeto: txthora evento: when

IF EMTY(THISFORM.TXTFECHA.VALUE)
RETURN .F.
ELSE
RETURN .T.
ENDIF

Objeto: txtclave evento: when

IF EMTY(THISFORM.TXTHORA.VALUE)
RETURN .F.
ELSE
RETURN .T.
ENDIF

Y ASI PARA TODOS LOS OBJETOS

ESPERO TE SIRVA....

Si estas travajando con VFP ANTERIOR A 9:

PRUEBA CON EL VALID DEL OBJETO

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