Metodo Valid

31/07/2003 - 01:58 por Norberto Belones | Informe spam
Hola a todos, estoy comenzando a programar en VFP y me encuentro con el
siguiente inconveniente :
Tengo un form con varios Text Box y dos command Button, una "Aceptar" y otra
"Cancelar", el problema es como
puedo hacer para que no se ejecute el evento Valid de cualquiera de los Text
Box cuando presiono tecla "Cancelar".
Por 'ESC' no tengo problemas porque está habilitada la opción KeyPreview .T.

Muchas gracias
N.O.B.

Preguntas similare

Leer las respuestas

#1 Luigi
31/07/2003 - 03:44 | Informe spam
El problema tuyo es que el valid se ejecuta cuando
cambias de objeto, no sólo por oprimir el botón
de "cancelar". Te sugiero que en los valid de los campos
textbox pongas instrucciones que tengan que ver con su
validación individual; y en el botón de "Aceptar"
o "Cancelar", porngas instrucciones generales de
validación. Espero te sirva.


Hola a todos, estoy comenzando a programar en VFP y me


encuentro con el
siguiente inconveniente :
Tengo un form con varios Text Box y dos command Button,


una "Aceptar" y otra
"Cancelar", el problema es como
puedo hacer para que no se ejecute el evento Valid de


cualquiera de los Text
Box cuando presiono tecla "Cancelar".
Por 'ESC' no tengo problemas porque está habilitada la


opción KeyPreview >..T.

Muchas gracias
N.O.B.



.

Respuesta Responder a este mensaje
#2 José Rojas
31/07/2003 - 17:21 | Informe spam
Puedes utilizar la funcion AMOUSEOBJ( ) , para saber sobre que control
esta posicionado el puntero del raton y condicionar la ejecucion del
codigo del evento valid.

coloca en el VALID

LOCAL ARRAY MyArray(1)
LOCAL loObjetc
AMOUSEOBJ(MyArray )

loObjetc= MyArray(1)
IF loObjetc.Name = 'NombredelBotonCancelar'
RETURN
ENDIF



“NO LE DISPARES AL ZORRO, OBTEN TU COPIA LEGAL.”
Maracaibo, Venezuela


PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway
Respuesta Responder a este mensaje
#3 Jesus Rojas
31/07/2003 - 21:25 | Informe spam
Hola

Lo que yo utilizo es una propiedad . en el Menu Form /Nueva Propiedad Tecla
Entonces le pongo el siguiente codigo en cada evento de cada text, asi como
sigue :
Evento GotFocus :
ThisForm.Tecla = .f.

Evento KeyPress

LPARAMETERS nKeyCode, nShiftAltCtrl
If nKeyCode or nKeyCode=9
Thisform.Tecla= .t.
Endif

Evento Valid
-
If Thisform.Tecla
&& aqui valido lo que quiera
if <condicion=ok>
RETURN 1
Else
=messagebox("Dato no válido")
Thisform.Tecla = .f.
RETURN 0
Endif
Emdif

Y Eso es todo . Quiere decir que si no se presiona la tecla Enter o Tab en
los textbox, simplemente no va a validar nada y te dejara presionar
cualquier otro boton.

Espero te sirva de ayuda

Salu2 desde Perú

Jesús Rojas Cárdenas
Analista Programador
Lima-Peru

"Norberto Belones" escribió en el mensaje
news:
Hola a todos, estoy comenzando a programar en VFP y me encuentro con el
siguiente inconveniente :
Tengo un form con varios Text Box y dos command Button, una "Aceptar" y


otra
"Cancelar", el problema es como
puedo hacer para que no se ejecute el evento Valid de cualquiera de los


Text
Box cuando presiono tecla "Cancelar".
Por 'ESC' no tengo problemas porque está habilitada la opción KeyPreview > .T.

Muchas gracias
N.O.B.



Respuesta Responder a este mensaje
#4 Norberto Belones
01/08/2003 - 06:01 | Informe spam
Muchas gracias a todos.

Norberto


Norberto Belones escribió en el mensaje de noticias

Hola a todos, estoy comenzando a programar en VFP y me encuentro con el
siguiente inconveniente :
Tengo un form con varios Text Box y dos command Button, una "Aceptar" y


otra
"Cancelar", el problema es como
puedo hacer para que no se ejecute el evento Valid de cualquiera de los


Text
Box cuando presiono tecla "Cancelar".
Por 'ESC' no tengo problemas porque está habilitada la opción KeyPreview > .T.

Muchas gracias
N.O.B.



email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida