topic-18029

Board index FiveWin para Harbour/xHarbour Ctrl + A, B, C en xBrowse

Mauricio

Posts: 199

Joined: Thu Oct 06, 2005 09:07 PM

Ctrl + A, B, C en xBrowse
Posted: Sat Feb 06, 2010 03: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

luisduque

Posts: 133

Joined: Mon May 12, 2008 04:13 PM

Re: Ctrl + A, B, C en xBrowse
Posted: Sat Feb 06, 2010 04: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

Fivewin 16.11
Harbour 3.2.0
Visual Studio 2015 community
MariaDb/MySql

Ing. MSc. Luis Duque
http://www.accasoft.net

acuellar

Posts: 1710

Joined: Tue Oct 28, 2008 06:26 PM

Re: Ctrl + A, B, C en xBrowse
Posted: Sat Feb 06, 2010 12:57 PM

Mauricio

Prueba asi

Code (fw): Select all Collapse

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

Saludos,

Adhemar

Saludos,

Adhemar C.

Mauricio

Posts: 199

Joined: Thu Oct 06, 2005 09:07 PM

Re: Ctrl + A, B, C en xBrowse
Posted: Sat Feb 06, 2010 10:20 PM

Gracias Luis y Adhemar,

pruebo y les comento,

saludos,
Mauricio :mrgreen:

:lol:

FiveTech Support Forums

Continue the discussion