Hola amigos, tal vez alguien ya lo ha hecho y pueda compartirlo.
Necesito simular soltar e inmediatamente oprimir por ejemplo la tecla SHIFT mientras ésta se encuentra oprimida.
Es decir, sin soltar la tecla SHIFT, simular via codigo que se ha soltado y que inmediatamente se ha oprimido nuevamente.
Lo que quiero hacer es llamar a una function de validacion mientras el usuario mantiene oprimida la tecla SHIFT y accionando la tecla KEY_DOWN sobre un XBROWSE. Esta function será llamada después de cada accionar de la tecla KEY_DOWN (flecha-abajo).
Seudo-codigo:
If nKey == VK_DOWN .and. GetKeyState(VK_SHIFT)
oBrw:SendMsg(Soltar tecla)
oBrw: SendMsg(Oprimir tecla)
endif
Alguna sugerencia, o idea?
Gracias de antemano.
Saludos.
Necesito simular soltar e inmediatamente oprimir por ejemplo la tecla SHIFT mientras ésta se encuentra oprimida.
Es decir, sin soltar la tecla SHIFT, simular via codigo que se ha soltado y que inmediatamente se ha oprimido nuevamente.
Lo que quiero hacer es llamar a una function de validacion mientras el usuario mantiene oprimida la tecla SHIFT y accionando la tecla KEY_DOWN sobre un XBROWSE. Esta function será llamada después de cada accionar de la tecla KEY_DOWN (flecha-abajo).
Seudo-codigo:
If nKey == VK_DOWN .and. GetKeyState(VK_SHIFT)
oBrw:SendMsg(Soltar tecla)
oBrw: SendMsg(Oprimir tecla)
endif
Alguna sugerencia, o idea?
Gracias de antemano.
Saludos.
Francisco J. AlegrĂa P.
Chinandega, Nicaragua.
Fwxh-MySql-TMySql
Chinandega, Nicaragua.
Fwxh-MySql-TMySql