forzar a salir del valid
Publicado por Luighi (105 intervenciones) el 14/08/2007 19:25:00
tengo un form con al menos los cuadros de texto txtBuscar, txtCantidad
y un boton de comando cmdSalir
en el txtBuscar defini en el evento valid lo siguiente:
*-------------------------------------------------------------------------
cValor=allt(this.value)
if !empt(cValor)
--do case
------case <condicion1> && osea aqui tambien hago uso de cValor
-------------*y cosas que hago cuando esta condicion se cumple
-------------*me entere que no puedo usar setfocus aqui por eso hago lo siguiente:
-------------retu thisform.txtCantidad && me entere que esto dirige el enfoque
------case <condicion2>
-------------*y todo lo que tenga que hacer aqui
-------------retu .f.
------othe
-------------*y todo lo que tenga que hacer aqui si no pasa nada con las anteriores
--encase
else
--wait 'ingrese lo que desea buscar' wind nowa
--retu .f.
endif
*----------------------------------------------------------------------------
el problema es como sigue:
cuando le doy click al boton cmdSalir del formulario
el valid se ejecuta
sencillamente, como evito el valid al darle click en cmdSalir?
pues solo deseo cerrar el formulario sin que tenga que ejecutarse alguna otra cosa
otro problemita es que si llevo todo ese codigo con algunos cambios a otro evento
como trabajaria los return .f.?, pues hacer me evita que el enfoque avance
bueno espero pueda ayudarme un poquitin
y un boton de comando cmdSalir
en el txtBuscar defini en el evento valid lo siguiente:
*-------------------------------------------------------------------------
cValor=allt(this.value)
if !empt(cValor)
--do case
------case <condicion1> && osea aqui tambien hago uso de cValor
-------------*y cosas que hago cuando esta condicion se cumple
-------------*me entere que no puedo usar setfocus aqui por eso hago lo siguiente:
-------------retu thisform.txtCantidad && me entere que esto dirige el enfoque
------case <condicion2>
-------------*y todo lo que tenga que hacer aqui
-------------retu .f.
------othe
-------------*y todo lo que tenga que hacer aqui si no pasa nada con las anteriores
--encase
else
--wait 'ingrese lo que desea buscar' wind nowa
--retu .f.
endif
*----------------------------------------------------------------------------
el problema es como sigue:
cuando le doy click al boton cmdSalir del formulario
el valid se ejecuta
sencillamente, como evito el valid al darle click en cmdSalir?
pues solo deseo cerrar el formulario sin que tenga que ejecutarse alguna otra cosa
otro problemita es que si llevo todo ese codigo con algunos cambios a otro evento
como trabajaria los return .f.?, pues hacer me evita que el enfoque avance
bueno espero pueda ayudarme un poquitin
Valora esta pregunta


0