//-> Para Accionar Las Teclas Ctrl+F10 Para Llamar la Calculadora
oDlg:bKeyDown := { | nKey | TECLAS_PRESS( nKey ) }

STATIC FUNCTION TECLAS_PRESS( nKey )

DO CASE

   CASE ( nKey == VK_F10 .AND. GetKeyState( VK_CONTROL ) )

   ? 'Control+F10-For Windows'

   // ACTION...

ENDCASE

RETURN( .T. )

Antonio, ke estoy haciendo errado??

Necesito Teclar CONTROL + F10 y Hacer Una Accion...

Antonio, Socorro... Gracias.

Antonio, en FiveWin 2.7 for [x]Harbour, esta Funcion HB_SETKEYGET(), Funciona?

Cual és la sintaxis ??

Antonio... Puedes ayudarme???

Has Probado con SetKey() ?
SetKey (K_CTRL_F10, {|| Funcion()})

// Control-function keys
// Añadido por Victor 10/04/2003 15:13

define K_CTRL_F1 -20 // Ctrl-F1

define K_CTRL_F2 -21 // Ctrl-F2

define K_CTRL_F3 -22 // Ctrl-F4

define K_CTRL_F4 -23 // Ctrl-F3

define K_CTRL_F5 -24 // Ctrl-F5

define K_CTRL_F6 -25 // Ctrl-F6

define K_CTRL_F7 -26 // Ctrl-F7

define K_CTRL_F8 -27 // Ctrl-F8

define K_CTRL_F9 -28 // Ctrl-F9

define K_CTRL_F10 -29 // Ctrl-F10

define K_CTRL_F11 -44 // * Ctrl-F11

define K_CTRL_F12 -45 // * Ctrl-F12

A mi me va muy bien.

AngelSalom wrote:Has Probado con SetKey() ?
SetKey (K_CTRL_F10, {|| Funcion()})

// Control-function keys
// Añadido por Victor 10/04/2003 15:13
#define K_CTRL_F1 -20 // Ctrl-F1
#define K_CTRL_F2 -21 // Ctrl-F2
#define K_CTRL_F3 -22 // Ctrl-F4
#define K_CTRL_F4 -23 // Ctrl-F3
#define K_CTRL_F5 -24 // Ctrl-F5
#define K_CTRL_F6 -25 // Ctrl-F6
#define K_CTRL_F7 -26 // Ctrl-F7
#define K_CTRL_F8 -27 // Ctrl-F8
#define K_CTRL_F9 -28 // Ctrl-F9
#define K_CTRL_F10 -29 // Ctrl-F10
#define K_CTRL_F11 -44 // * Ctrl-F11
#define K_CTRL_F12 -45 // * Ctrl-F12

A mi me va muy bien.

Joao,

SetKey(), como te ha indicado Angel, es la opción idónea porque así no dependes de en que control esté el foco.

Antonio Linares wrote:Joao,

SetKey(), como te ha indicado Angel, es la opción idónea porque así no dependes de en que control esté el foco.