• Domingo 16 de Junio de 2024, 15:31

Autor Tema:  Problemas Con Lostfocus /setfocus  (Leído 2644 veces)

Sergio Ray

  • Nuevo Miembro
  • *
  • Mensajes: 9
    • Ver Perfil
Problemas Con Lostfocus /setfocus
« en: Viernes 27 de Mayo de 2005, 17:03 »
0
Hola a todos :
Podrian ayudarme con los Eventos LostFocus / y SetFocus.

Luego de completar un TxTFecha, si queda sin completar en el Evento Lost focus
pogo lo siguiente.

If Empty(Thisform.TxtFecha)
Messagebox(Eerror Completar")
Thisform.TxtFecha.Set focus
endif

Pero no regresa a ese objeto, que debo estar haciendo mal ?
Porfi Ayuda No Puedo Seguir porque no me pueden quedar campos sin completar.

Pero si pongo en el Objeto siguiente en el Evento When , si lo hace por Que?

Muchisimas gracias.

PD Si no contesto algunas preguntas es porque recien comienzo con VFP

Cyclop

  • Miembro MUY activo
  • ***
  • Mensajes: 323
    • Ver Perfil
    • http://www.geocities.com/icotext/spanish/
Re: Problemas Con Lostfocus /setfocus
« Respuesta #1 en: Miércoles 1 de Junio de 2005, 22:14 »
0
Esto lo tienes que controlar en el evento valid

Código: Text
  1. If Empty(Thisform.TxtFecha)
  2.    Messagebox(Eerror Completar")
  3.    Return .F.
  4. Endif
  5.  
  6. Return .T.
  7.  
  8.  

Salu2

Cyclop

 B)
Icotext Evolution v0.5 para los amantes del ASCII Art
http]

the_punch64

  • Nuevo Miembro
  • *
  • Mensajes: 4
    • Ver Perfil
Re: Problemas Con Lostfocus /setfocus
« Respuesta #2 en: Viernes 1 de Julio de 2005, 20:37 »
0
&&pon este codigo en el evento Valid del TextBox

If !Empty(this.value)
    Return .T. && si hay algun valor
else
    Return .F. && no introdujo ningun valor
Endif