FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Setkey para varias acciones SOLUCIONADO
Posts: 162
Joined: Tue Feb 03, 2009 10:08 PM
Setkey para varias acciones SOLUCIONADO
Posted: Thu Oct 03, 2019 02:39 PM

Foro buenos días

Estoy buscando la forma de asignarle a una misma tecla de función varias acciones a ejecutar

Por ejemplo con VK_F12
1- SetKey ( VK_F12 , { | | Agregar_datos ( nQty, nPago ) } ) // funciona bien

Como se hace para usar:
2- CONTROL
3- SHIFT
4- ALT

Gracias

J. Ernesto Pinto Q.
Fwh_x64 2501, BCC++_x64 7_70 , Harbour 3.20, LopeEdit 5.8
jepsys@hotmail.com, jepsys@gmail.com

Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Posts: 162
Joined: Tue Feb 03, 2009 10:08 PM
Re: Setkey para varias acciones SOLUCIONADO
Posted: Fri Oct 04, 2019 12:43 AM

SetKey ( VK_F12 , { | | IIF ( GetKeyState ( VK_SHIFT ), x10_grilla_fotos ( ) ,; && VK_Shift := 16
IIF ( GetKeyState ( VK_CONTROL ), x_20_grilla_fotos ( ) ,; && VK_Control := 17
x_37_grilla_fotos ( ) ) ) } ) && VK_normal

Gracias

J. Ernesto Pinto Q.
Fwh_x64 2501, BCC++_x64 7_70 , Harbour 3.20, LopeEdit 5.8
jepsys@hotmail.com, jepsys@gmail.com

Continue the discussion