topic-7353

Board index FiveWin para Harbour/xHarbour Una de TWBrowse

Posts: 1054

Joined: Sun Oct 09, 2005 10:41 PM

Una de TWBrowse

Posted: Thu Jun 21, 2007 05:11 AM

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

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Una de TWBrowse

Posted: Thu Jun 21, 2007 08:46 AM

Willi,

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

Code: Select all Collapse

METHOD KeyDown( nKey, nFlags ) CLASS TWBrowse

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

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

regards, saludos

Antonio Linares
www.fivetechsoft.com

Willi Quintana

Posts: 1054

Joined: Sun Oct 09, 2005 10:41 PM

Una de TWBrowse

Posted: Fri Jun 22, 2007 04:13 AM

Gracias,,, funciona
Salu2

FiveTech Support Forums

Una de TWBrowse

Una de TWBrowse

Una de TWBrowse

Continue the discussion