FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Pocket PC Teclas del cursor
Posts: 144
Joined: Sun Dec 18, 2005 03:18 PM
Teclas del cursor
Posted: Tue Nov 10, 2009 08:19 PM

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
Posts: 199
Joined: Thu Oct 06, 2005 09:07 PM
Re: Teclas del cursor
Posted: Wed Nov 11, 2009 01:19 AM

Hola Salvador,

que browse utilizas?

Posts: 144
Joined: Sun Dec 18, 2005 03:18 PM
Re: Teclas del cursor
Posted: Wed Nov 11, 2009 10:57 AM

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
Posts: 199
Joined: Thu Oct 06, 2005 09:07 PM
Re: Teclas del cursor
Posted: Thu Nov 12, 2009 09:00 AM
Hola Chava:

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

Code (fw): Select all Collapse
聽 聽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
Posts: 144
Joined: Sun Dec 18, 2005 03:18 PM
Re: Teclas del cursor
Posted: Thu Nov 12, 2009 12:12 PM
Mauricio,

Este c贸digo prbado en el emulador de Windows Mobile 6 profesional no procesa las teclas del cursor:
Code (fw): Select all Collapse
#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

Continue the discussion