Page 1 of 1

Una de TWBrowse

Posted: Thu Jun 21, 2007 5:11 am
by Willi Quintana
Hola Amigos.
Intento "detectar" el movimiento del cursor a la derecha e izquierza en un TWBrowse, bKeyDown no detecta cuando presionas las teclas de navegacion derecha e izquierza, hay alguna manera de detectar que estas teclas fueron presionadas? <- ->

Salu2

Posted: Thu Jun 21, 2007 8:46 am
by Antonio Linares
Willi,

Tienes que modificar la clase y aƱadirle esto antes del do case:

Code: Select all

METHOD KeyDown( nKey, nFlags ) CLASS TWBrowse

   if ::bKeyDown != nil
      Eval( ::bKeyDown, nKey, nFlags, Self )
   endif

   do case
      case nKey == VK_UP
           ::GoUp()

Posted: Fri Jun 22, 2007 4:13 am
by Willi Quintana
Gracias,,, funciona
Salu2