Ctrl + A, B, C en xBrowse

Ctrl + A, B, C en xBrowse

Postby Mauricio » Sat Feb 06, 2010 3:15 am

Hola,

como puedo detectar Ctrol+R en un xBrowse,

ya tengo una funcion que me lee las teclas con bKeyDown, pero no puedo hacer con un Ctrl + xLetra

siempre en cuanto presion Ctrl me envia el 17 como tecla pulsada.


saludos,
Mauricio
User avatar
Mauricio
 
Posts: 199
Joined: Thu Oct 06, 2005 9:07 pm
Location: San Diego, CA

Re: Ctrl + A, B, C en xBrowse

Postby luisduque » Sat Feb 06, 2010 4:36 am

Hola

oBrw:bKeyDown := {| nKey | If(nKey = VK_DELETE,BorLinBr(oBrw,nKey),If(nKey = VK_INSERT,InsLinBr(oBrw),If(nKey == 71 .and. GetKeyState( VK_CONTROL ),GuardarFC(),)))}

Espero te ayude
luisduque
 
Posts: 133
Joined: Mon May 12, 2008 4:13 pm
Location: Venezuela

Re: Ctrl + A, B, C en xBrowse

Postby acuellar » Sat Feb 06, 2010 12:57 pm

Mauricio

Prueba asi
Code: Select all  Expand view

oWnd:bKeyDown:= { | nKey | iif( GetKeyState(VK_CONTROL) .And. UPPER(CHR(nKey))="P",Listados(), )}


Saludos,

Adhemar
Saludos,

Adhemar C.
User avatar
acuellar
 
Posts: 1594
Joined: Tue Oct 28, 2008 6:26 pm
Location: Santa Cruz-Bolivia

Re: Ctrl + A, B, C en xBrowse

Postby Mauricio » Sat Feb 06, 2010 10:20 pm

:lol:

Gracias Luis y Adhemar,

pruebo y les comento,


saludos,
Mauricio :mrgreen:
User avatar
Mauricio
 
Posts: 199
Joined: Thu Oct 06, 2005 9:07 pm
Location: San Diego, CA


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 39 guests