Algún ejemplo de tHotKey

[Bingen Ugaldebere]

Pues eso alguien que le haya funcionado y sepa decirme algo.
Quiero hacer una combinación de teclas general para toda la aplicación y
que pueda llamar desde cualquier sitio, he probado cosas como esta pero
no van. Gracias.
WITH OBJECT tHotKey():New( )
:Create()
If :lAlt .And. :lCtrl
Msginfo(:nKey)
Endif
End

[ignacio]

Bingen,
La clase THotKey es un control de edición tipo TEDit que permite recoger
cualquier pulsación de teclado. Es un control del propio API de Windows y
puedes ver como funciona en la opción de propiedades de cualquier opción de
ejecución de archivo del menú de Inicio de Windows bajo el nombre de 'Tecla
de método abreviado'.
Para lo que quieres hacer es mejor utilizar el comando SET KEY.
SetKey( nKey, nFlag, bCode ).
Por ejemplo:
SetKey( Asc( "C" ), FALT, {|| Calculator() } )
Saludos
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Bingen Ugaldebere" <bingen@muninser.com> escribió en el mensaje
news:[email=45ed9812@news.xailer.com...]45ed9812@news.xailer.com...[/email]
> Pues eso alguien que le haya funcionado y sepa decirme algo.
> Quiero hacer una combinación de teclas general para toda la aplicación y
> que pueda llamar desde cualquier sitio, he probado cosas como esta pero no
> van. Gracias.
>
> WITH OBJECT tHotKey():New( )
> :Create()
> If :lAlt .And. :lCtrl
> Msginfo(:nKey)
> Endif
> End

[Bingen Ugaldebere]

Ok ahora lo entiendo, joer que despistado estaba.
Pensaba que era una nueva manera de usar el setkey de siempre.
Gracias y Salu2