Página 1 de 1
Cuando salgo de un tedit como puedo evaluar una funcion
Publicado: Mar Sep 06, 2005 12:00 pm
por PILO
Cuando salgo de tedit o otro controlos donde pido datos, como puedo evaluar
una serie de condiciones
o hacer un filtro, y si no se cumple volver al foco de ese control,
Un ejemplo por favor
Muchas gracias de antemano.
Cuando salgo de un tedit como puedo evaluar una funcion
Publicado: Mar Sep 06, 2005 12:12 pm
por jfgimenez
PILO,
> Cuando salgo de tedit o otro controlos donde pido datos, como puedo
> evaluar una serie de condiciones
> o hacer un filtro, y si no se cumple volver al foco de ese control,
Usa el evento OnExit de ese control. Si devuelves .F., el foco permanecerá
en el control; si devuelves .T. o Nil, el foco pasará al control que lo iba
a recibir.
> Un ejemplo por favor
METHOD MaskEdit1Exit( oSender, oNextCtl ) CLASS TForm1
IF Upper( oSender:Value ) == "OK" .OR. oNextCtrl == ::oMaskEdit3
RETURN .T.
ENDIF
RETURN .F.
--
Un saludo,
José F. Giménez
Cuando salgo de un tedit como puedo evaluar una funcion
Publicado: Mar Sep 06, 2005 12:19 pm
por PILO
Gracias por el ejemplo
"Jose F. Gimenez" <
jfgimenez@wanadoo.es> escribió en el mensaje
news:431d6ba9$[email=
1@ozsrvnegro.ozlan.local...]
1@ozsrvnegro.ozlan.local...[/email]
> PILO,
>
>> Cuando salgo de tedit o otro controlos donde pido datos, como puedo
>> evaluar una serie de condiciones
>> o hacer un filtro, y si no se cumple volver al foco de ese control,
>
> Usa el evento OnExit de ese control. Si devuelves .F., el foco permanecerá
> en el control; si devuelves .T. o Nil, el foco pasará al control que lo
> iba a recibir.
>
>
>> Un ejemplo por favor
>
> METHOD MaskEdit1Exit( oSender, oNextCtl ) CLASS TForm1
>
> IF Upper( oSender:Value ) == "OK" .OR. oNextCtrl == ::oMaskEdit3
> RETURN .T.
> ENDIF
>
> RETURN .F.
>
> --
> Un saludo,
>
> José F. Giménez
>