FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour TSBROWSE - testar tecla pressionada antes da edição? (OK)
Posts: 1286
Joined: Mon Feb 25, 2008 02:54 PM
TSBROWSE - testar tecla pressionada antes da edição? (OK)
Posted: Wed Mar 24, 2010 01:41 PM

Sr. Manuel,

É possível testar a tecla pressionada (ex: VK_RETURN) antes da edição da célula?

tentei usar:
obrw:bkeydown:={|nKey| ...} não funcionou!

Sera que existe algo como:
obrw:aColumns[1]:bkeydown:={||...} ?????

Muito obrigado Sr. Manuel.

ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles´C
TDolphin
Posts: 1286
Joined: Mon Feb 25, 2008 02:54 PM
Re: TSBROWSE - testar tecla pressionada antes da edição? (OK)
Posted: Wed Apr 07, 2010 05:40 PM

Sr. Manuel,

Resolvido assim:

preedit {|| if(obrw:nlastkey()=13,(obrw:goright(),.f.),.t.)}

Muito obrigado

ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles´C
TDolphin
Posts: 782
Joined: Wed Dec 19, 2007 07:50 AM
Re: TSBROWSE - testar tecla pressionada antes da edição? (OK)
Posted: Thu Apr 08, 2010 01:11 AM
Hola Ubiratan:
SGS wrote:Resolvido assim:

preedit {|| if(obrw:nlastkey()=13,(obrw:goright(),.f.),.t.)}

Disculpa que no haya atendido tu consulta (no la había visto), tu solución me parece muy buena, también podrías usar la siguiente:

oBrw:bUserKeys := {|nKey,nFlags| If( nKey == VK_RETURN .and. nFlags > 0, VK_RIGHT, nKey ) }

Un abrazo.
manuelmercado at prodigy dot net dot mx
Posts: 1286
Joined: Mon Feb 25, 2008 02:54 PM
Re: TSBROWSE - testar tecla pressionada antes da edição? (OK)
Posted: Thu Apr 08, 2010 10:55 AM

Muito obrigado Sr. Manuel.

ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles´C
TDolphin

Continue the discussion