In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

TEdit, TMaskEdit... no procesar tecla

Foro de Xailer profesional en español
Responder
Xevi
Mensajes: 1706
Registrado: Jue Sep 08, 2005 12:58 pm

TEdit, TMaskEdit... no procesar tecla

Mensaje por Xevi »

No se donde se ha roto, pero creo recordar que antes funcionaba como se comenta en la ayuda...
TStdControl:OnKeyDown
Evento que se produce cuando se recibe una pulsación de teclado.
Parametros:
<oSender>:
Referencia al objeto que provoca el evento
<nKey>:
Código virtual de la tecla pulsada
<nFlags>:
Información adicional sobre la pulsación
Valor Retorno:
<Nil>:
Sigue el procesamiento por defecto de Windows
<0>:
Se paraliza el procesamiento de la tecla. El efecto es como si no se hubiera llegada a pulsar ninguna tecla
Bien, pues dado este código en OnKeyDown de un Edit...
METHOD Edit1KeyDown( oSender, nKey, nFlags ) CLASS TForm1
Do Case
Case nKey == VK_TAB .or.; //Tabulador
nKey == 45 .or. nKey == 109 .or. nKey == 189 //Signo -
Return 0
ENDCASE
RETURN Nil
Aunque retorne el valor de cero... sigue enviando el valor de la tecla al Edit.
Este Valor de Retorno no lo tiene en cuenta y sigue con el procesamiento de la tecla pulsada !!!
Un Saludo,
Xevi.

--
Arriba
_support_
Mensajes: 146
Registrado: Lun Abr 10, 2006 1:29 pm

TEdit, TMaskEdit... no procesar tecla

Mensaje por _support_ »

Xevi,
Dicha pulsación entra por WM_CHAR. Deberás cotnrolar igualmente el evento OnChar.
Saludos,
"Xevi" <xevicomas@gmail.com> escribió en el mensaje news:4577cd86$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
No se donde se ha roto, pero creo recordar que antes funcionaba como se comenta en la ayuda...
TStdControl:OnKeyDown
Evento que se produce cuando se recibe una pulsación de teclado.
Parametros:
<oSender>:
Referencia al objeto que provoca el evento
<nKey>:
Código virtual de la tecla pulsada
<nFlags>:
Información adicional sobre la pulsación
Valor Retorno:
<Nil>:
Sigue el procesamiento por defecto de Windows
<0>:
Se paraliza el procesamiento de la tecla. El efecto es como si no se hubiera llegada a pulsar ninguna tecla
Bien, pues dado este código en OnKeyDown de un Edit...
METHOD Edit1KeyDown( oSender, nKey, nFlags ) CLASS TForm1
Do Case
Case nKey == VK_TAB .or.; //Tabulador
nKey == 45 .or. nKey == 109 .or. nKey == 189 //Signo -
Return 0
ENDCASE
RETURN Nil
Aunque retorne el valor de cero... sigue enviando el valor de la tecla al Edit.
Este Valor de Retorno no lo tiene en cuenta y sigue con el procesamiento de la tecla pulsada !!!
Un Saludo,
Xevi.
--
Arriba
Xevi
Mensajes: 1706
Registrado: Jue Sep 08, 2005 12:58 pm

TEdit, TMaskEdit... no procesar tecla

Mensaje por Xevi »

Perdona por mi ignorancia, pero no consigo que se eliminen las pulsaciones que no quiero admitir en un Edit.
Si utilizo el evento OnChar()
METHOD EditCodiChar( oSender, nKey, nFlags ) CLASS TForm1
msginfo( nKey )
RETURN Nil
í‰ste sólo se evalúa en pulsaciones de teclas concretas... Tab, Enter... pero no en TODAS las pulsaciones.
Lo que pretendo es que en un TEdit o TMaskEdit, no tenga en cuenta por ej, el guión -
Si me puedes iluminar el camino, te lo agradecerí­a.
Gracias.
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <_support_@xailer.com> ha escrit al missatge del grup de discussió: [email=4577dc1f@news.xailer.com...]4577dc1f@news.xailer.com...[/email]
Xevi,
Dicha pulsación entra por WM_CHAR. Deberás cotnrolar igualmente el evento OnChar.
Saludos,
"Xevi" <xevicomas@gmail.com> escribió en el mensaje news:4577cd86$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
No se donde se ha roto, pero creo recordar que antes funcionaba como se comenta en la ayuda...
TStdControl:OnKeyDown
Evento que se produce cuando se recibe una pulsación de teclado.
Parametros:
<oSender>:
Referencia al objeto que provoca el evento
<nKey>:
Código virtual de la tecla pulsada
<nFlags>:
Información adicional sobre la pulsación
Valor Retorno:
<Nil>:
Sigue el procesamiento por defecto de Windows
<0>:
Se paraliza el procesamiento de la tecla. El efecto es como si no se hubiera llegada a pulsar ninguna tecla
Bien, pues dado este código en OnKeyDown de un Edit...
METHOD Edit1KeyDown( oSender, nKey, nFlags ) CLASS TForm1
Do Case
Case nKey == VK_TAB .or.; //Tabulador
nKey == 45 .or. nKey == 109 .or. nKey == 189 //Signo -
Return 0
ENDCASE
RETURN Nil
Aunque retorne el valor de cero... sigue enviando el valor de la tecla al Edit.
Este Valor de Retorno no lo tiene en cuenta y sigue con el procesamiento de la tecla pulsada !!!
Un Saludo,
Xevi.
--
Arriba
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:
Contactar jfgimenez

TEdit, TMaskEdit... no procesar tecla

Mensaje por jfgimenez »

Xevi,
Perdona por mi ignorancia, pero no consigo que se eliminen las pulsaciones que no quiero admitir en un Edit.
Si utilizo el evento OnChar()
METHOD EditCodiChar( oSender, nKey, nFlags ) CLASS TForm1
msginfo( nKey )
RETURN Nil
í‰ste sólo se evalúa en pulsaciones de teclas concretas... Tab, Enter... pero no en TODAS las pulsaciones.
Lo que pretendo es que en un TEdit o TMaskEdit, no tenga en cuenta por ej, el guión -
Ciertas teclas (Tab, Enter, cursores, etc.) son procesadas directamente por Xailer y no se genera ningún evento. Si quisieras cambiar ese comportamiento tendrí­as que sobrescribir la clase T.
Pero el guión no está entre ellas, salvo en el caso de MaskEdit cuando el valor es numérico, creo recordar. Si quieres profundizar más, enví­anos exactamente qué quieres hacer y le echamos un vistazo.
--
Un saludo,
José F. Giménez
http://www.xailer.com
--
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Arriba
Xevi
Mensajes: 1706
Registrado: Jue Sep 08, 2005 12:58 pm

TEdit, TMaskEdit... no procesar tecla

Mensaje por Xevi »

Jose,
Pues precisamente lo que pretendo es que en un MaskEdit, con picture "9999" por ej., no me admita el guión !!!
Sólo debe admitir valores positivos.
¿No se podrí­a implementar una propiedad para este menester???
Gracias.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> ha escrit al missatge del grup de discussió: [email=45780ed0@news.xailer.com...]45780ed0@news.xailer.com...[/email]
Xevi,
Perdona por mi ignorancia, pero no consigo que se eliminen las pulsaciones que no quiero admitir en un Edit.
Si utilizo el evento OnChar()
METHOD EditCodiChar( oSender, nKey, nFlags ) CLASS TForm1
msginfo( nKey )
RETURN Nil
í‰ste sólo se evalúa en pulsaciones de teclas concretas... Tab, Enter... pero no en TODAS las pulsaciones.
Lo que pretendo es que en un TEdit o TMaskEdit, no tenga en cuenta por ej, el guión -
Ciertas teclas (Tab, Enter, cursores, etc.) son procesadas directamente por Xailer y no se genera ningún evento. Si quisieras cambiar ese comportamiento tendrí­as que sobrescribir la clase T.
Pero el guión no está entre ellas, salvo en el caso de MaskEdit cuando el valor es numérico, creo recordar. Si quieres profundizar más, enví­anos exactamente qué quieres hacer y le echamos un vistazo.
--
Un saludo,
José F. Giménez
http://www.xailer.com
--
Arriba
Xevi
Mensajes: 1706
Registrado: Jue Sep 08, 2005 12:58 pm

TEdit, TMaskEdit... no procesar tecla

Mensaje por Xevi »

Alguna sugerencia al respecto???
Gracias.
Un Saludo,
Xevi.
"Xevi" <xevicomas@gmail.com> ha escrit al missatge del grup de discussió: 45781110$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
Jose,
Pues precisamente lo que pretendo es que en un MaskEdit, con picture "9999" por ej., no me admita el guión !!!
Sólo debe admitir valores positivos.
¿No se podrí­a implementar una propiedad para este menester???
Gracias.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> ha escrit al missatge del grup de discussió: [email=45780ed0@news.xailer.com...]45780ed0@news.xailer.com...[/email]
Xevi,
Perdona por mi ignorancia, pero no consigo que se eliminen las pulsaciones que no quiero admitir en un Edit.
Si utilizo el evento OnChar()
METHOD EditCodiChar( oSender, nKey, nFlags ) CLASS TForm1
msginfo( nKey )
RETURN Nil
í‰ste sólo se evalúa en pulsaciones de teclas concretas... Tab, Enter... pero no en TODAS las pulsaciones.
Lo que pretendo es que en un TEdit o TMaskEdit, no tenga en cuenta por ej, el guión -
Ciertas teclas (Tab, Enter, cursores, etc.) son procesadas directamente por Xailer y no se genera ningún evento. Si quisieras cambiar ese comportamiento tendrí­as que sobrescribir la clase T.
Pero el guión no está entre ellas, salvo en el caso de MaskEdit cuando el valor es numérico, creo recordar. Si quieres profundizar más, enví­anos exactamente qué quieres hacer y le echamos un vistazo.
--
Un saludo,
José F. Giménez
http://www.xailer.com
--
Arriba
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9440
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:
Contactar ignacio

TEdit, TMaskEdit... no procesar tecla

Mensaje por ignacio »

This is a multi-part message in MIME format.
------=_NextPart_000_0019_01C71EE0.8EB9FE50
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_001A_01C71EE0.8EB9FE50"
------=_NextPart_001_001A_01C71EE0.8EB9FE50
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Xevi,=20
Captura el evento OnChar de la siguiente forma:
METHOD MaskEdit1Char( oSender, nKey, nFlags ) CLASS TForm5
if nKey =3D=3D 45
return 0
endif
RETURN Nil
Necesitaras incluir el archivo adjunto.=20
Un saludo
--=20
Ignacio Ortiz de Z=FA=F1iga
http://www.xailer.com
"Xevi" <xevicomas@gmail.com> escribi=F3 en el mensaje =
news:[email=45802b83@news.xailer.com...]45802b83@news.xailer.com...[/email]
Alguna sugerencia al respecto???
Gracias.
Un Saludo,
Xevi.
"Xevi" <xevicomas@gmail.com> ha escrit al missatge del grup de =
discussi=F3: 45781110$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
Jose,
Pues precisamente lo que pretendo es que en un MaskEdit, con picture =
"9999" por ej., no me admita el gui=F3n !!!
S=F3lo debe admitir valores positivos.
=BFNo se podr=EDa implementar una propiedad para este menester???
Gracias.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> ha escrit al =
missatge del grup de discussi=F3: [email=45780ed0@news.xailer.com...]45780ed0@news.xailer.com...[/email]
Xevi,
Perdona por mi ignorancia, pero no consigo que se eliminen las =
pulsaciones que no quiero admitir en un Edit.
Si utilizo el evento OnChar()
METHOD EditCodiChar( oSender, nKey, nFlags ) CLASS TForm1
msginfo( nKey )
RETURN Nil
=C9ste s=F3lo se eval=FAa en pulsaciones de teclas concretas... =
Tab, Enter... pero no en TODAS las pulsaciones.
Lo que pretendo es que en un TEdit o TMaskEdit, no tenga en =
cuenta por ej, el gui=F3n -
Ciertas teclas (Tab, Enter, cursores, etc.) son procesadas =
directamente por Xailer y no se genera ning=FAn evento. Si quisieras =
cambiar ese comportamiento tendr=EDas que sobrescribir la clase T.
Pero el gui=F3n no est=E1 entre ellas, salvo en el caso de =
MaskEdit cuando el valor es num=E9rico, creo recordar. Si quieres =
profundizar m=E1s, env=EDanos exactamente qu=E9 quieres hacer y le =
echamos un vistazo.
--=20
Un saludo,
Jos=E9 F. Gim=E9nez
http://www.xailer.com
------=_NextPart_001_001A_01C71EE0.8EB9FE50
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.5730.11" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff background=3D"">
<DIV><FONT face=3DArial size=3D2>Xevi, </FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Captura el evento OnChar de la =
siguiente=20
forma:</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV><FONT face=3DArial =
size=3D2>
<DIV><BR>METHOD MaskEdit1Char( oSender, nKey, nFlags ) CLASS =
TForm5</DIV>
<DIV>Â</DIV>
<DIV>ÂÂ if nKey =3D=3D 45<BR>ÂÂÂÂÂ =
return=20
0<BR>ÂÂ endif</DIV>
<DIV>Â</DIV>
<DIV>RETURN Nil</DIV>
<DIV>Â</DIV>
<DIV>Necesitaras incluir el archivo adjunto. </DIV>
<DIV>Â</DIV>
<DIV>Un saludo</FONT></DIV>
<DIV><BR>-- <BR>Ignacio Ortiz de Z=FA=F1iga<BR><A=20
href=3D"http://www.xailer.com">http://www.xailer.com</A></DIV>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV>"Xevi" <<A=20
href=3D"mailto:xevicomas@gmail.com">xevicomas@gmail.com</A>> =
escribi=F3 en el=20
mensaje <A=20
=
href=3D"news:45802b83@news.xailer.com">news:45802b83@news.xailer.com</A>.=
...</DIV>
<DIV><FONT face=3DArial size=3D2>Alguna sugerencia al =
respecto???</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Gracias.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Un Saludo,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Xevi.</FONT></DIV>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV>"Xevi" <<A=20
href=3D"mailto:xevicomas@gmail.com">xevicomas@gmail.com</A>> ha =
escrit al=20
missatge del grup de discussi=F3: <A=20
=
href=3D"mailto:45781110$1@news.xailer.com">45781110$1@news.xailer.com</A>=
....</DIV>
<DIV><FONT face=3DArial size=3D2>Jose,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Pues precisamente lo que pretendo =
es que en un=20
MaskEdit, con picture "9999" por ej.,Âno me admita el gui=F3n=20
!!!</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>S=F3lo debe admitir valores=20
positivos.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>=BFNo se podr=EDa implementar una =
propiedad para=20
este menester???</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Gracias.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Un Saludo,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Xevi.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV>"Jose F. Gimenez" <jfgimenez@wanadoo.es> ha =
escrit=20
al missatge del grup de discussi=F3: <A=20
=
href=3D"mailto:45780ed0@news.xailer.com">45780ed0@news.xailer.com</A>...<=
/DIV>
<DIV><FONT face=3DArial size=3D2>Xevi,</FONT></DIV>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV><FONT face=3DArial size=3D2>Perdona por mi ignorancia, pero =
no consigo=20
que se eliminen las pulsaciones que no quiero admitir en un=20
Edit.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Si utilizo el evento =
OnChar()</FONT></DIV>
<DIV><FONT face=3DArial color=3D#0000ff size=3D2>METHOD =
EditCodiChar( oSender,=20
nKey, nFlags ) CLASS TForm1<BR>msginfo( nKey )<BR>RETURN=20
Nil<BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2>=C9ste s=F3lo se eval=FAa en =
pulsaciones de=20
teclas concretas... Tab, Enter... pero no en TODAS las=20
pulsaciones.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Lo que pretendo es que en un =
TEdit o=20
TMaskEdit, no tenga en cuenta por ej, el gui=F3n =
-</FONT></DIV></BLOCKQUOTE>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>Ciertas teclas (Tab, =
Enter, cursores,=20
etc.) son procesadas directamente por Xailer y no se genera =
ning=FAn evento.=20
Si quisieras cambiar ese comportamiento tendr=EDas que =
sobrescribir la clase=20
T.</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV dir=3Dltr><FONT face=3DArial size=3D2>Pero el gui=F3n no =
est=E1 entre ellas,=20
salvo en el caso de MaskEdit cuando el valor es num=E9rico, creo =
recordar.=20
Si quieres profundizar m=E1s, env=EDanos exactamente qu=E9 quieres =
hacer y le=20
echamos un vistazo.</FONT></DIV>
<DIV dir=3Dltr><FONT face=3DArial =
size=3D2></FONT>Â</DIV><FONT face=3DArial=20
size=3D2>
<DIV dir=3Dltr><BR>-- <BR>Un saludo,</DIV>
<DIV>Â</DIV>
<DIV dir=3Dltr>Jos=E9 F. Gim=E9nez<BR><A=20
=
href=3D"http://www.xailer.com">http://www.xailer.com</A></FONT></DIV></BL=
OCKQUOTE></BLOCKQUOTE></BLOCKQUOTE></BODY></HTML>
------=_NextPart_001_001A_01C71EE0.8EB9FE50--
------=_NextPart_000_0019_01C71EE0.8EB9FE50
Content-Type: application/octet-stream;
name="MaskEdit.rar"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
filename="MaskEdit.rar"
UmFyIRoHAM+QcwAADQAAAAAAAACl93QgkDEA5wkAABcYAAACt6REeh2PjTUd MwwAIAAAAE1hc2tF
ZGl0Lm9iagDwZwwEDB2VEMzM/JQV8OnsRJXW0k2XEW3G2n0p67GnHZa5WWeh otlEkJElpOOUxI6W
yldSJpKLaQtFrEgaF6HRXReh0UByu9EAktAdvpbfGy2XwoFvhAL4W+F8IK0S XKL4TxoDFvg6M5mp
Io6Tm6TpRRZlf8CQCdzM59zr3M079/Mc7MznT8Pv2bv3Nzn25g5/A9m+FezJ M2XGj9STmZ3UxsuZ
852dm6OHpC+pei1y550mWfl6BzdzxOI3xMPXeRsv5w/F8YrN/s/YxKQOMP4e yz7vJ38b0uppSMuX
mFFbWDN0Ix806lmRmUSVVkUn4YH6M7/vJ4AY6MvLRxSUuOBh/bfYnBDGZH0Z srDjFU8EYm/zMK+H
mRo2JiVw8U/Nz0mrvKwPAD+UFTnmKRe3P7ND0AyqvmQnSr4W+Ev4W48prZ8f Pw/MQzJjDpAyz46j
HSdBOMzRlhggUV1vMBY9SKNIJSTv2lknH5uYGEXQ6ubVjNvrO/Q5Zsn/+ERG mnnkx1/qp203qD3N
po0cUP5mjp1TonnFA8PteHk+f5i/cmrMSWwWh6i/EDJSKcOts1Qy6+fKmp1n 3YCW2743d6rSlX73
LEtiwneTCWOYDp2XG6cQnCxL8XOufjwIcFZF52RkKy/V0V6/eworBL9STi++ vF7n5hKjBJ4f5tVi
0PUEvYE8erhMWQL8GxLvIr8lI/bbGW8XF50V5Dfxclw5fOEVBXamhrhFkRYL jHcYwtzXD41IfRdu
ivjnu4URw+hu7SjyAq/Dh0sajnUAWBaUKODtG4V9akUOFa1WnBkQrVA2sqiT 1FBE9taoigvXMKHj
u7S7Xr+CBug5bHlU/Ok/Fc7ak9KFMOxp+gc7oYtKeNkc8V0Si9HCdS8gTVTT guYGw0sMwp9kwKdt
5XylrGV3IsuCyhoFO6mELKFXtu4fPoWO9xhW1dXd2EOVHoL6pNtlEJKTxXNI zIvXz4MuTGjzJmRp
55dgswgnqu9KPGm6McQu5f6+qufKoQ2QQu/4Nmdhzl8j9rUvRxIEJLwxoHsf wuPyXCzY/ezhfiDU
GReEKyJn73c7lfXhsQ6e4HX1WQdGNsP+4WF3soWqrhGarLX/y28S/1b4uPBI b8ufhxMDV9FA5g+c
OAOGPpj6w88csf0x9of1h90feH+MELvrFhduv+CuC0vVsKr8/0XP+4RNviIK g38YSsZ7cC4IEtvi
TyiS4JL8eSAYWEckjzUJmEn6Fk4dsk+yPwD90f9B+Ifj1mcRtGge/RB7sb4e GBYxDmEl0PoAa1vm
2SeOhJ9kB1yT65J7aE91CfZQnwEn9Y/3j/kP+o/CP/I/92UA/4SV7VCGhJvB 4I+OPlD9MboBC3Q1
phIT0x9UckemP2B/Vsnj7RJ+6P8JJ9pCRd756rVp6marCFsdwA3L9wolFmoH LiILmkIJDJiK9X1i
EiIs1ZQ+yQ7g++P2yrf6UD3UD3x/2iLdX4CHiiLtX4h+OIvnFcs5hEYThzr+ IxnNyCM7KcBOBW04
CdiojzoKBkjK650ggQnDnDnDne3EZzhzhzhzgTScBOBNZwE/WJ4K3ngTwVxP Anlcs/m6xBH6w5Qy
tWeOeOeCuZ4E/9US6nlbM8c8hPKwUB0LjWG4ysmhTru6AFArLoDoDoDoDoDo IFAFeUAKH8Yl7QIU
Kce4ofAQSYPHEvqvL0s/OWxV+P7lhY1oZ5NHmi+kYqF1teOYbtatN2M8w5mL OZaSn9d9kFZ2cuhJ
4maqUZjqiqaKHavRGrElnZuJlnzY9L50UxietanrmtJ7CC7ip+Uc6Uye6iqs PsY0HNjaM2XSZnKh
JDjsq6EXiuRJXiiqqP0kXVyIyaoYDZH9OPLkvM088TFNTOrAliUcalPBgnHb HZrOtz4Gg8kxpsxz
Iy9DrIxrBsWMpdSUvGsGwB5xjkRRq6NC05VgGYqJlSSVOL7yboRtoEyDglSQ m1sHCHMp+E2Z2EWM
zypnMnPlHx9LaBtadLAdvXnuCjBM7EmWcI4l7hSoD383PRhRIsk9yDtj4cqU CjIix7IHdB8+k9gO
d2DaxlIGLViXZBr1Ow24NYpil7mXHyy/0WPZNdZdm4qJylj1MFgG2w1sPQOk iyrxPgVNZlvr6qxX
p6cpWuimJDNTc1h5c5PL6ze3H1YX3SjUcyZWnrQqC7YGsczdHbiRBfdqPos3 aMfbj5gXwSV0sZOQ
HtCCaFuDYAqshHtVEW8BrgCwePt1EG92lWq/59wSt8DYgsnLL7MZWC5Ct+oj 58fRq7cHrSVwB5Af
Lmou80FY8vVXgYYVlTgjtgFN0p90o0sJSPHuhKDV2FcJRYIir5Pb5rK8CuGM sDZpwK9JXE2qhp9q
x+4JXFrWHX1t4uVvKtiL4CUJ02uDb+jMAPNdwFZylleMDZAujH03UnsaCKm5 Bm7pJFSdRDYPe6fu
zlMbNVBVH+ccihS1UczdFyeXvs2UMbNzcErnPbl5C5Sp7gXNmqbwqDTt212b vUtRQfM0F9Fa+0MV
dWCZ2ugI3fF4CqUYKsvGDdJx+MlJR4ijqKzfPLlN36ekloLYpFVHO2zXUXG8 AuNBJIS8EEmqrBLO
16gqNVdRgwbU7jeDSCspNbL9RVp7P6iw3CLnS5SKY17BWnIisCtVaVCyTU73 BYF6tGDyrgYhW6Wg
MjeEmzC4twfwzj+Id1LmpOl0ugTMx5gty8b3FTaKaJYeZm79MB7gIvNUn7dG 8ZOULA0nH5XXoTMB
YdjPidDuOXNpJS6sNNTQnVE7svODkJUX+QHzA/0DjeSnmpkYPR1GNnThlsji J5M4x+JEJo9N5Sea
o+6Hb7KdERvop6F+8bMyyNy08lK9unAbENXMXaivti2ofmbZ93m3tpSyYNax 1w35KedFx7Wt8XsY
uHqS16QN02t3teJnIFQZcf8raTloBef8s6mLRVZib5thajBN2n8wviyNU7T1 YPyGZaxYqcBtNqSK
iPp2NZ6iU3ml2eL6/tKifu+kJQjEUIv4u/75fOYzSIwnDp1Bx4EF3jl9zy0E YtoIurAgkKuY0N9C
epksyWTZrFgOrBWc0iIJMS9fvteSXH7pL3/vKI+PLI7bMjm8sjbtBGpaiM/Z kYVislEPICL2QG5Z
oeutu/sUsAfQH6Y+XI/56KlbpVIOLSSH6094thXpMkOsSQdIqjqp7AkIrEfu wlG48OoFAx3JSM0T
9GPJKRjc+Fiir2Lr2pi2CV8WeaXMaDR2SJENOO3j4sGU1X77KEmSl7YlEq0W rTPYUTi2U5vKzqrd
abBS4sVUl4eOVK17DlQR1EkUYCJFMGjhJIiklDkVXOlJT7pu8eA8elw1WUoT WJE0u0TNVbE1axYS
ZeolENm8g0vzkcIVcwjlS+sUl/MhFI3a3uTd5aLVMhKhfXS/zT/5xD17AEAH AA==
------=_NextPart_000_0019_01C71EE0.8EB9FE50--

Attached files MaskEdit.rar (2.5 KB)Â
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Arriba
Xevi
Mensajes: 1706
Registrado: Jue Sep 08, 2005 12:58 pm

TEdit, TMaskEdit... no procesar tecla

Mensaje por Xevi »

Ignacio,
PERFECTO !!!
Gracias.
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> ha escrit al missatge del grup de discussió: 458031a4$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
Xevi,
Captura el evento OnChar de la siguiente forma:
METHOD MaskEdit1Char( oSender, nKey, nFlags ) CLASS TForm5
if nKey == 45
return 0
endif
RETURN Nil
Necesitaras incluir el archivo adjunto.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Xevi" <xevicomas@gmail.com> escribió en el mensaje news:[email=45802b83@news.xailer.com...]45802b83@news.xailer.com...[/email]
Alguna sugerencia al respecto???
Gracias.
Un Saludo,
Xevi.
"Xevi" <xevicomas@gmail.com> ha escrit al missatge del grup de discussió: 45781110$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
Jose,
Pues precisamente lo que pretendo es que en un MaskEdit, con picture "9999" por ej., no me admita el guión !!!
Sólo debe admitir valores positivos.
¿No se podrí­a implementar una propiedad para este menester???
Gracias.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> ha escrit al missatge del grup de discussió: [email=45780ed0@news.xailer.com...]45780ed0@news.xailer.com...[/email]
Xevi,
Perdona por mi ignorancia, pero no consigo que se eliminen las pulsaciones que no quiero admitir en un Edit.
Si utilizo el evento OnChar()
METHOD EditCodiChar( oSender, nKey, nFlags ) CLASS TForm1
msginfo( nKey )
RETURN Nil
í‰ste sólo se evalúa en pulsaciones de teclas concretas... Tab, Enter... pero no en TODAS las pulsaciones.
Lo que pretendo es que en un TEdit o TMaskEdit, no tenga en cuenta por ej, el guión -
Ciertas teclas (Tab, Enter, cursores, etc.) son procesadas directamente por Xailer y no se genera ningún evento. Si quisieras cambiar ese comportamiento tendrí­as que sobrescribir la clase T.
Pero el guión no está entre ellas, salvo en el caso de MaskEdit cuando el valor es numérico, creo recordar. Si quieres profundizar más, enví­anos exactamente qué quieres hacer y le echamos un vistazo.
--
Un saludo,
José F. Giménez
http://www.xailer.com
--
Arriba
Responder

Volver a “Xailer Pro Spanish”