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.

Como fao para navegar com as TECLAS DE SETA, PARA CIMA, PARA BAIXO.???

Foro público de Xailer en español
Responder
claudio
Mensajes: 49
Registrado: Mar May 06, 2008 3:17 pm

Como fao para navegar com as TECLAS DE SETA, PARA CIMA, PARA BAIXO.???

Mensaje por claudio »

Tenho uma aplicação onde o usuario quer se mover com SETAS PARA CIMA,PARA
BAIXO.
Arriba
Xevi
Mensajes: 1706
Registrado: Jue Sep 08, 2005 12:58 pm

Como fao para navegar com as TECLAS DE SETA, PARA CIMA, PARA BAIXO.???

Mensaje por Xevi »

Claudio,
Supongo que lo que quieres es poder ir al anterior o siguiente Edit al
pulsar las flechas arriba o abajo.
Puedes añadir este código en tu aplicación, me lo escribieron hace ya
muuuucho tiempo...
CLASS TEdit FROM XEdit
PUBLISHED:
PROPERTY lAutoSelect INIT asSELECTALL
METHOD WMKeyDown( nKey, nFlags )
METHOD WMKillFocus( wParam, lParam ) INLINE Super:WMKillFocus( wParam,
lParam ), ::lInsert := .T., 0
ENDCLASS
METHOD WMKeyDown( nKey, nFlags ) CLASS TEdit
IF nKey == VK_UP
::GoPrevControl()
ELSEIF nKey == VK_DOWN
::GoNextControl()
ELSE
RETURN Super:WMKeyDown( nKey, nFlags )
ENDIF
RETURN 0
A mi me está funcionando perfectamente, espero que sea lo que necesitas.
Un Saludo,
Xevi.
"claudio" <santos@transbank.com.br> escribió en el mensaje
news:[email=49a577d3@svctag-j7w3v3j....]49a577d3@svctag-j7w3v3j....[/email]
> Tenho uma aplicação onde o usuario quer se mover com SETAS PARA CIMA,PARA
> BAIXO.
>
>
Arriba
jrcsistemas
Mensajes: 180
Registrado: Lun Sep 15, 2008 2:53 pm

Como fao para navegar com as TECLAS DE SETA, PARA CIMA, PARA BAIXO.???

Mensaje por jrcsistemas »

Xevi.
Me intereso tu respuesta y lo quise implementar pero me aparece esto al
ejecutarlo.
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Message not found
Operación: TFORMMENU:XEDIT
Argumentos:
Fichero:
Código error SO: 0
Pila de llamadas:
TFORMMENU:CREATEFORM (3)
TFORMMENU:NEW (182)
MAIN (25)
No encuentra la clase xEdit?
Juan
"Xevi" <xevicomas_quitar_esto@gmail.com> escribió en el mensaje
news:49a6501f$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Claudio,
>
> Supongo que lo que quieres es poder ir al anterior o siguiente Edit al
> pulsar las flechas arriba o abajo.
>
> Puedes añadir este código en tu aplicación, me lo escribieron hace ya
> muuuucho tiempo...
>
> CLASS TEdit FROM XEdit
> PUBLISHED:
> PROPERTY lAutoSelect INIT asSELECTALL
>
> METHOD WMKeyDown( nKey, nFlags )
> METHOD WMKillFocus( wParam, lParam ) INLINE Super:WMKillFocus( wParam,
> lParam ), ::lInsert := .T., 0
> ENDCLASS
>
> METHOD WMKeyDown( nKey, nFlags ) CLASS TEdit
>
> IF nKey == VK_UP
> ::GoPrevControl()
> ELSEIF nKey == VK_DOWN
> ::GoNextControl()
> ELSE
> RETURN Super:WMKeyDown( nKey, nFlags )
> ENDIF
>
> RETURN 0
>
>
> A mi me está funcionando perfectamente, espero que sea lo que necesitas.
>
>
> Un Saludo,
> Xevi.
>
>
> "claudio" <santos@transbank.com.br> escribió en el mensaje
> news:[email=49a577d3@svctag-j7w3v3j....]49a577d3@svctag-j7w3v3j....[/email]
>> Tenho uma aplicação onde o usuario quer se mover com SETAS PARA CIMA,PARA
>> BAIXO.
>>
>>
>
>
Arriba
jrcsistemas
Mensajes: 180
Registrado: Lun Sep 15, 2008 2:53 pm

Como fao para navegar com as TECLAS DE SETA, PARA CIMA, PARA BAIXO.???

Mensaje por jrcsistemas »

Xevi.
Solucionado. Funciona bien. El unico inconveniente es cuando llego a un
ComboBox, y vengo entusiasmado pulsando tecla ABAJO, se me cambia el volar
que tenia el combo y puede ocacionar un lio en los datos si no tengo
cuidado. No se si le lo voy a en produccion.
Gracias.
Juan
"Xevi" <xevicomas_quitar_esto@gmail.com> escribió en el mensaje
news:49a6501f$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Claudio,
>
> Supongo que lo que quieres es poder ir al anterior o siguiente Edit al
> pulsar las flechas arriba o abajo.
>
> Puedes añadir este código en tu aplicación, me lo escribieron hace ya
> muuuucho tiempo...
>
> CLASS TEdit FROM XEdit
> PUBLISHED:
> PROPERTY lAutoSelect INIT asSELECTALL
>
> METHOD WMKeyDown( nKey, nFlags )
> METHOD WMKillFocus( wParam, lParam ) INLINE Super:WMKillFocus( wParam,
> lParam ), ::lInsert := .T., 0
> ENDCLASS
>
> METHOD WMKeyDown( nKey, nFlags ) CLASS TEdit
>
> IF nKey == VK_UP
> ::GoPrevControl()
> ELSEIF nKey == VK_DOWN
> ::GoNextControl()
> ELSE
> RETURN Super:WMKeyDown( nKey, nFlags )
> ENDIF
>
> RETURN 0
>
>
> A mi me está funcionando perfectamente, espero que sea lo que necesitas.
>
>
> Un Saludo,
> Xevi.
>
>
> "claudio" <santos@transbank.com.br> escribió en el mensaje
> news:[email=49a577d3@svctag-j7w3v3j....]49a577d3@svctag-j7w3v3j....[/email]
>> Tenho uma aplicação onde o usuario quer se mover com SETAS PARA CIMA,PARA
>> BAIXO.
>>
>>
>
>
Arriba
Xevi
Mensajes: 1706
Registrado: Jue Sep 08, 2005 12:58 pm

Como fao para navegar com as TECLAS DE SETA, PARA CIMA, PARA BAIXO.???

Mensaje por Xevi »

Juan,
La verdad es que tienes razón, cuando entre Edits tenemos Combos... pues se
nos va la mano con tanto flecha arriba/abajo, pero aparte de esto... los
usuarios finales te agradecen que puedan canviar de foco con las flechas,
salvando este inconveniente,... recuerda que "antes" de Xailer, yo
programaba en Clipper MSDOS... y cuesta "romper" lazos.
Un Saludo,
Xevi.
"Juan Castañeda" <jrcsistemas@speedy.com.ar> escribió en el mensaje
news:[email=49a672e8@svctag-j7w3v3j....]49a672e8@svctag-j7w3v3j....[/email]
> Xevi.
> Solucionado. Funciona bien. El unico inconveniente es cuando llego a un
> ComboBox, y vengo entusiasmado pulsando tecla ABAJO, se me cambia el volar
> que tenia el combo y puede ocacionar un lio en los datos si no tengo
> cuidado. No se si le lo voy a en produccion.
>
> Gracias.
>
> Juan
>
> "Xevi" <xevicomas_quitar_esto@gmail.com> escribió en el mensaje
> news:49a6501f$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Claudio,
>>
>> Supongo que lo que quieres es poder ir al anterior o siguiente Edit al
>> pulsar las flechas arriba o abajo.
>>
>> Puedes añadir este código en tu aplicación, me lo escribieron hace ya
>> muuuucho tiempo...
>>
>> CLASS TEdit FROM XEdit
>> PUBLISHED:
>> PROPERTY lAutoSelect INIT asSELECTALL
>>
>> METHOD WMKeyDown( nKey, nFlags )
>> METHOD WMKillFocus( wParam, lParam ) INLINE Super:WMKillFocus( wParam,
>> lParam ), ::lInsert := .T., 0
>> ENDCLASS
>>
>> METHOD WMKeyDown( nKey, nFlags ) CLASS TEdit
>>
>> IF nKey == VK_UP
>> ::GoPrevControl()
>> ELSEIF nKey == VK_DOWN
>> ::GoNextControl()
>> ELSE
>> RETURN Super:WMKeyDown( nKey, nFlags )
>> ENDIF
>>
>> RETURN 0
>>
>>
>> A mi me está funcionando perfectamente, espero que sea lo que necesitas.
>>
>>
>> Un Saludo,
>> Xevi.
>>
>>
>> "claudio" <santos@transbank.com.br> escribió en el mensaje
>> news:[email=49a577d3@svctag-j7w3v3j....]49a577d3@svctag-j7w3v3j....[/email]
>>> Tenho uma aplicação onde o usuario quer se mover com SETAS PARA
>>> CIMA,PARA BAIXO.
>>>
>>>
>>
>>
>
>
Arriba
jrcsistemas
Mensajes: 180
Registrado: Lun Sep 15, 2008 2:53 pm

Como fao para navegar com as TECLAS DE SETA, PARA CIMA, PARA BAIXO.???

Mensaje por jrcsistemas »

Xevi.
Lo soluciono haciendo que bajen con enter, tanto en edit como en combo. Yo
programo en clipper hace 21 años y estoy haciendo mi primer sistema en
Xalier con MySQL. Sin conocer programacion de objetos ni servidores de bases
de datos. Te imaginaras como estoy luchando. Como extraño el brief con
dbrief cada ves que abro el IDE de xailer!!! Las teclas rapidas, la
identacion automatica, marcar por bloques sin tener que usar el mouse,
copiar una linea o bloques con un simple + .. y un largo etc...
Pero estoy obligado por mi mismo a hacer el cambio.. Suerte
Saludos
Juan
"Xevi" <xevicomas_quitar_esto@gmail.com> escribió en el mensaje
news:49a687af$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Juan,
>
> La verdad es que tienes razón, cuando entre Edits tenemos Combos... pues
> se nos va la mano con tanto flecha arriba/abajo, pero aparte de esto...
> los usuarios finales te agradecen que puedan canviar de foco con las
> flechas, salvando este inconveniente,... recuerda que "antes" de Xailer,
> yo programaba en Clipper MSDOS... y cuesta "romper" lazos.
>
> Un Saludo,
> Xevi.
>
>
> "Juan Castañeda" <jrcsistemas@speedy.com.ar> escribió en el mensaje
> news:[email=49a672e8@svctag-j7w3v3j....]49a672e8@svctag-j7w3v3j....[/email]
>> Xevi.
>> Solucionado. Funciona bien. El unico inconveniente es cuando llego a un
>> ComboBox, y vengo entusiasmado pulsando tecla ABAJO, se me cambia el
>> volar que tenia el combo y puede ocacionar un lio en los datos si no
>> tengo cuidado. No se si le lo voy a en produccion.
>>
>> Gracias.
>>
>> Juan
>>
>> "Xevi" <xevicomas_quitar_esto@gmail.com> escribió en el mensaje
>> news:49a6501f$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>>> Claudio,
>>>
>>> Supongo que lo que quieres es poder ir al anterior o siguiente Edit al
>>> pulsar las flechas arriba o abajo.
>>>
>>> Puedes añadir este código en tu aplicación, me lo escribieron hace ya
>>> muuuucho tiempo...
>>>
>>> CLASS TEdit FROM XEdit
>>> PUBLISHED:
>>> PROPERTY lAutoSelect INIT asSELECTALL
>>>
>>> METHOD WMKeyDown( nKey, nFlags )
>>> METHOD WMKillFocus( wParam, lParam ) INLINE Super:WMKillFocus( wParam,
>>> lParam ), ::lInsert := .T., 0
>>> ENDCLASS
>>>
>>> METHOD WMKeyDown( nKey, nFlags ) CLASS TEdit
>>>
>>> IF nKey == VK_UP
>>> ::GoPrevControl()
>>> ELSEIF nKey == VK_DOWN
>>> ::GoNextControl()
>>> ELSE
>>> RETURN Super:WMKeyDown( nKey, nFlags )
>>> ENDIF
>>>
>>> RETURN 0
>>>
>>>
>>> A mi me está funcionando perfectamente, espero que sea lo que necesitas.
>>>
>>>
>>> Un Saludo,
>>> Xevi.
>>>
>>>
>>> "claudio" <santos@transbank.com.br> escribió en el mensaje
>>> news:[email=49a577d3@svctag-j7w3v3j....]49a577d3@svctag-j7w3v3j....[/email]
>>>> Tenho uma aplicação onde o usuario quer se mover com SETAS PARA
>>>> CIMA,PARA BAIXO.
>>>>
>>>>
>>>
>>>
>>
>>
>
>
Arriba
Responder

Volver a “Spanish”