FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Ejecutar Funcion Combinando tres Teclas
Posts: 851
Joined: Sun Nov 09, 2014 05:01 PM
Ejecutar Funcion Combinando tres Teclas
Posted: Sat Aug 31, 2024 12:55 PM

Hola a todos, amigos del foro.

驴C贸mo puedo ejecutar una funci贸n desde cualquier parte de mi sistema presionando la combinaci贸n de tres teclas?

Por ejemplo: ALT + SHIFT + F8

"Los errores en programaci贸n, siempre est谩n entre la silla y el teclado..."



Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin



Carora, Estado Lara, Venezuela.
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Ejecutar Funcion Combinando tres Teclas
Posted: Sat Aug 31, 2024 04:27 PM
Estimado Jos茅:

Yo lo hago as铆 con dos teclas, tal vez agregando una mas?
Code (fw): Select all Collapse
聽 聽 IF聽 GetAsyncKey(VK_F2,VK_F12)
聽 聽 聽 聽 TuFuncion()
聽 聽 ENDIF
Desde luego debe ser en un GET

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: Ejecutar Funcion Combinando tres Teclas
Posted: Sat Aug 31, 2024 05:22 PM
Jos茅, mira si te sirve de gu铆a.
Code (fw): Select all Collapse
 if(GetKeyState(VK_CONTROL) .AND. GetKeyState(VK_SHIFT) .AND. GetKeyState(VK_TAB), TuFunc(),)
Francisco J. Alegr铆a P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 851
Joined: Sun Nov 09, 2014 05:01 PM
Re: Ejecutar Funcion Combinando tres Teclas
Posted: Sat Aug 31, 2024 06:04 PM

Estimados amigos.

El c贸digo de armando me funcion贸 pero solo con 2 teclas.

El de Francisco funcion贸 bien con las teclas indicadas.

Muchas Gracias a Ambos. !!

"Los errores en programaci贸n, siempre est谩n entre la silla y el teclado..."



Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin



Carora, Estado Lara, Venezuela.

Continue the discussion