Teclas del cursor

Post Reply
Salvador
Posts: 142
Joined: Sun Dec 18, 2005 3:18 pm
Location: España

Teclas del cursor

Post by Salvador »

Hola.
Necesito procesar la pulsación de las teclas del cursor de una PDA con WMB6 .
He probado con los eventos bKeyDown y bKeyChar del dialogo pero no consigo detectar su pulsación.
¿Puede alguien echarme un cable?. :(

Gracias.
Saludos
Salvador
User avatar
Mauricio
Posts: 199
Joined: Thu Oct 06, 2005 9:07 pm
Location: San Diego, CA

Re: Teclas del cursor

Post by Mauricio »

Hola Salvador,

que browse utilizas?
Salvador
Posts: 142
Joined: Sun Dec 18, 2005 3:18 pm
Location: España

Re: Teclas del cursor

Post by Salvador »

No es un browse es un dialogo con botones.
Pretendo que al pulsar las teclas del cursor se activen determinados botones del dialogo.
Pero al parecer el dialogo no procesa las teclas del cursor en el evento bKeyDown del dialogo.
Probado en el emulador.
Saludos
Salvador
User avatar
Mauricio
Posts: 199
Joined: Thu Oct 06, 2005 9:07 pm
Location: San Diego, CA

Re: Teclas del cursor

Post by Mauricio »

Hola Chava:

que emulador es, estoy probando con el emulador de Microsoft y funciona perfecto.

Code: Select all

   DEFINE DIALOG oDlg RESOURCE 'Vender2' TITLE "Catalogo de Clientes"
   oDlg:bKeyDown := { | nKey, nFlags | msginfo(nKey)}




   REDEFINE LISTBOX oLbx FIELDS substr(clientes->Nombre,1,20), transform(clientes->Saldo,'999,999.99'),;
        clientes->Direccion, str(clientes->Codigo,6);
        HEADERS "Nombre","Saldo", "Dirección","Código" ID 100 OF oDlg FONT oFont2


   oLbx:bKeyChar := { | nKey, nFlags | Search(nKey), oLbx:Refresh()}
   oLbx:aJustify := {.f., .t., .f., .f.}
   oLbx:nClrBackFocus := {|| rgb(100,170,208) }

   ACTIVATE DIALOG oDlg CENTERED
 
podes probar con ese y confirmanos si funciona, seria bueno saber que emulador tenes, para ver si alguien del foro lo esta usando y puede probar.

si gustas, pasame tu codigo y lo pruebo en una Hand held Dolphin 7600 y podemos ver si funciona.

si gustas, pasame tu msn y lo revisamos

saludos,
Mauricio
Salvador
Posts: 142
Joined: Sun Dec 18, 2005 3:18 pm
Location: España

Re: Teclas del cursor

Post by Salvador »

Mauricio,

Este código prbado en el emulador de Windows Mobile 6 profesional no procesa las teclas del cursor:

Code: Select all

#include "FWCE.ch"


function Main()

   local oDlg

   DEFINE DIALOG oDlg TITLE "Inkey test" ;
      SIZE 200, 100 COLOR "N/G"
   
    oDlg:bKeyDown := {| nKey, nFlag| Msginfo(nKey) } 
   
   @ 1.8, 6 BUTTON "End" ACTION oDlg:End() SIZE 30, 10

   ACTIVATE DIALOG oDlg CENTERED ;
 
   
return nil
Gracias por tu atención.
Saludos
Salvador
Post Reply