FoxPro/Visual FoxPro - declarar un campo vacio

 
Vista:

declarar un campo vacio

Publicado por Pedro Madrid (1 intervención) el 31/05/2006 20:14:43
Hola a todos
Nececito que en un formulario de visual fox no me permita introducir "items" a una lista, si la caja de texto se encuentra vacia, por que el formulario permite agregar "items" vacios a la lista.
tengo estos tres objetos:
command1
lista1
text1
En el boton ingreso lo sigiente:

if thisform.text1.value="" then
messagebox('error')
else
thisform.list1.additem(thisform.text1.value)
thisform.text1.value=""
thisform.text1.setfocus
endif
me manda el messagebox de error aunque escriba en la caja de texto y no agrega el item
alguien puede ayudarme por favor????
lo unico que quiero es impedir que el formulario agrege campos vacios a la lista...
muchas 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:declarar un campo vacio

Publicado por Hernan (2 intervenciones) el 01/06/2006 02:54:56
Bueno por lo que entiendo podrias utilizar esto

if EMPTY(thisform.text1.value)
messagebox ("error")
return .F.
endif

thisform.list1.additem(thisform.text1.value)
thisform.text1.value=""
thisform.text1.setfocus

con esto verificas que el text no quede vacio pero con el EMPTY que resulta mas especifico y luego con el return te sales del ciclo, o sea que si esta vacio te manda el mensaje y sale del ciclo

lo otro que pusieses hacer es colocar la validacion en el lostfocus del text o en el gotfocus del siguiente objeto que se ejecute despues de el text,

Espero haberte ayudado, cualquier cosa me avisas
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