Modificando KeyDown de TwBrowse. Antonio Linares

Post Reply
jhugono
Posts: 24
Joined: Sat Dec 10, 2005 7:42 am
Location: Tepatitlan, Mexico.
Contact:

Modificando KeyDown de TwBrowse. Antonio Linares

Post by jhugono »

Buen Día
Saludos a Todos.

Agregando. Las siguientes Líneas a la Clase Twbrowse;
De acuerdo a las recomendaciones de Antonio Linares,
Para capturar las Teclas de Movimiento.

Code: Select all

METHOD KeyDown( nKey, nFlags ) CLASS TWBrowse

   local lRefresh

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

Al hacer esto si captura las teclas de Movimiento, eso esta bien.

Pero Oprimir digamos un Enter o un Supr, lo captura DOS VECES.

Help.....
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Code: Select all

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

Antonio Linares
www.fivetechsoft.com
jhugono
Posts: 24
Joined: Sat Dec 10, 2005 7:42 am
Location: Tepatitlan, Mexico.
Contact:

Post by jhugono »

Gracias Antonio Linares.

Con eso ya no se captura el Enter o el Supr dos veces, Pero ahora ya no captura las teclas como INICIO, FIN, AVPAG, y demás Teclas de movimiento.
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Ponlo al final del método
regards, saludos

Antonio Linares
www.fivetechsoft.com
jhugono
Posts: 24
Joined: Sat Dec 10, 2005 7:42 am
Location: Tepatitlan, Mexico.
Contact:

Post by jhugono »

Antonio Linares.

Si Funciono.

Saludos y Gracias ...
Post Reply