Habilitar retorno na seta

[Cassiano de Oliveira]

Senhores como faço para habilitar a Seta pra cima pra ir pros campos
anteriores?
habilitando o Application:lReturn := .T. eu habilito para que o ENTER vá
para os campos posteriores, eu preciso agora habilitar a SETA pra cima pra
ir para os campos superiores como se fosse um SHIFT + TAB
Gracias

[emeasoft]

Cassiano,
Na verdade setas tem propriedades próprias dentro de um Edit, ou seja servem para mudar o cursor de lugar.
Todavia fiz um pequeno exemplo que anula as setas.
Aproveitei também para incluir exemplos do cPicture conforme vocíª
me solicitou.
Abraços.

Attached files TestecPicture.zip (4.9 KB)Â

[jfgimenez]

Cassiano,
> Senhores como faço para habilitar a Seta pra cima pra ir pros campos
> anteriores?
>
> habilitando o Application:lReturn := .T. eu habilito para que o ENTER
> vá para os campos posteriores, eu preciso agora habilitar a SETA pra
> cima pra ir para os campos superiores como se fosse um SHIFT + TAB
Prueba a poner esto en tu código:
CLASS TEdit FROM XEdit
METHOD WMKeyDown()
ENDCLASS
METHOD WMKeyDown( nKey, nFlags, hWnd ) CLASS TEdit
IF nKey == VK_UP
::GoPrevControl()
RETURN 0
ENDIF
RETURN Super:WMKeyDown( nKey, nFlags, hWnd )
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

[Cassiano de Oliveira]

Obrigado Mário pelo exemplo e obrigado José pela dica...
Grande abraço
"www[dot]eMeAsOfT[dot]com" wrote in message
news:50643f6a$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Cassiano,
Na verdade setas tem propriedades príƒÂ³prias dentro de um
Edit, ou seja servem para mudar o cursor de lugar.
Todavia fiz um pequeno exemplo que anula as setas.
Aproveitei tambíƒÂ©m para incluir exemplos do cPicture
conforme vocíƒÂª
me solicitou.
AbraíƒÂ§os.
--
http://www.eMeAsOfT.com
http://emeasoft.blogspot.com/
http://twitter.com/emeasoft
http://www.facebook.com/emeasoft
https://plus.google.com/102999253031532804222
http://g.co/maps/26gey