FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Evitar puntero XBrowse se mueva al dar enter. (RESUELTO)
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Evitar puntero XBrowse se mueva al dar enter. (RESUELTO)
Posted: Sun Jan 17, 2016 05:50 PM

Saludos.
Parece que sigue el problema con el forum. Ya me habia "logeado" correctamente, y al tratar de grabar mi consulta me pidio de nuevo el login y lo que habia escrito se perdio.

En resumen, mi consulta es:
Como evitar que el puntero del XBrowse salte a la siguiente columna al presionar enter en un browse cuyas columnas no son editables??

Como dato: El ancho de la primer columna es menor que ancho del campo de la dbf
Gracias.

Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: Evitar puntero XBrowse se mueva al dar enter. (RESUELTO)
Posted: Sun Jan 17, 2016 06:43 PM

Despues de "dar mas vueltas que un trompo".

PostMessage( oBrwMenu:hWnd, WM_KEYDOWN, VK_LEFT )

Saludos.

Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 632
Joined: Tue Dec 12, 2006 07:34 PM
Re: Evitar puntero XBrowse se mueva al dar enter. (RESUELTO)
Posted: Tue Jan 19, 2016 03:03 PM
FranciscoA wrote:Despues de "dar mas vueltas que un trompo".

PostMessage( oBrwMenu:hWnd, WM_KEYDOWN, VK_LEFT )

Saludos.



Hola buenos dias Ing. Francisco, eso igual andaba buscando y lei tu post, pero al parecer a mi no me funciona , le doy enter y me mueve el puntero a la siguiente columna, no me estabiliza en la misma columna al insertar nuevo registro o enter, como lo soluciono!

Saludos y buen dia.!

Atte: Adrian C. C.
acc69@hotmail.com
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: Evitar puntero XBrowse se mueva al dar enter. (RESUELTO)
Posted: Tue Jan 19, 2016 10:59 PM

Hola Adrian.
El problema que tenía era en un xBrowse de donde tomo los datos de productos (estoy desarrollando un comandero, para bar-restoran).
Este browse tiene x columnas, por defecto no editables, al cual al darle enter para tomar los datos, el puntero del browse pasaba a la siguiente columna,
lo cual resultaba incomodo. Claro que lo había resuelto llamanda a GoleftMost() después de retornar los datos, pero como dije: incomodo y anti-estetico.

Aquí está como lo solucioné:

:bKeyDown := {|nKey| if( nKey == VK_RETURN, ( PostMessage( oBrwMenu:hWnd, WM_KEYDOWN, VK_LEFT ), MiCalculad(x,x) ),) }

La Function MiCalculad(x,x) es un dialogo calculadora para digitar cantidad del producto.

Cualquier información estoy a tus ordenes.

Vos mencionas un caso con edicion de celda. ¿Podrias poner codigo o ampliar tu comentario?

Saludos.

Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 632
Joined: Tue Dec 12, 2006 07:34 PM
Re: Evitar puntero XBrowse se mueva al dar enter. (RESUELTO)
Posted: Thu Mar 03, 2016 09:36 PM
FranciscoA wrote:Hola Adrian.
El problema que tenía era en un xBrowse de donde tomo los datos de productos (estoy desarrollando un comandero, para bar-restoran).
Este browse tiene x columnas, por defecto no editables, al cual al darle enter para tomar los datos, el puntero del browse pasaba a la siguiente columna,
lo cual resultaba incomodo. Claro que lo había resuelto llamanda a GoleftMost() después de retornar los datos, pero como dije: incomodo y anti-estetico.

Aquí está como lo solucioné:

:bKeyDown := {|nKey| if( nKey == VK_RETURN, ( PostMessage( oBrwMenu:hWnd, WM_KEYDOWN, VK_LEFT ), MiCalculad(x,x) ),) }

La Function MiCalculad(x,x) es un dialogo calculadora para digitar cantidad del producto.

Cualquier información estoy a tus ordenes.

Vos mencionas un caso con edicion de celda. ¿Podrias poner codigo o ampliar tu comentario?

Saludos.


Gracias Ing. Francisco, apenas leo tu respuesta,estuve fuera del foro un buen tiempo, disculpa por responderle hasta ahora.

Y gracias por el ejemplo, pero en mi caso creo que es diferente al de usted, ya que yo ejecuto ciertas condiciones,como eliminar y altas,no se si es lo mismo como funciona con el ejemplo que proporciona,dentro incluyo la funcion Val_nKetDet().

oBrw:bKeyDown := {| nKey| Val_nKDet(nKey) }


Code (fw): Select all Collapse
STATIC FUNCTION Val_nKDet(nKey)

 DO CASE
    CASE nKey == VK_INSERT .AND. lNew
          KeyToggle(VK_INSERT)
          Mod_Cap(.T.)

    CASE nKey == VK_DELETE .AND. lNew
          Sup_Cap()

    CASE nKey == VK_RETURN .AND. lNew
          Mod_Cap(.F.)
 ENDCASE
RETURN (NIL)


El objetivo es al dar enter dentro del browse es que no se salte a la siguiente columna, que se quede fijo, es como la pantallla de la captura de de polizas el que le pase , si se acuerda ing. Francisco,supongo que si, bueno hare pruebas y le comento .

Gracias Ing. Francisco.

Saludos.

Atte: Adrian C. C.
acc69@hotmail.com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Evitar puntero XBrowse se mueva al dar enter. (RESUELTO)
Posted: Fri Mar 04, 2016 08:31 AM
Como evitar que el puntero del XBrowse salte a la siguiente columna al presionar enter en un browse cuyas columnas no son editables??


oBrw:bKeyChar := { |nKey,f,b,o| If( nKey == VK_RETURN .and. !o:lEditable, 0, nil ) }
Regards



G. N. Rao.

Hyderabad, India
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: Evitar puntero XBrowse se mueva al dar enter. (RESUELTO)
Posted: Fri Mar 04, 2016 10:39 AM

Francisco

El problema para login en el Forum son las Cookies del navegador tenés que borrar el historial.

Saludos,

Adhemar

Saludos,



Adhemar C.
Posts: 632
Joined: Tue Dec 12, 2006 07:34 PM
Re: Evitar puntero XBrowse se mueva al dar enter. (RESUELTO)
Posted: Fri Mar 04, 2016 05:12 PM
acuellar wrote:Francisco

El problema para login en el Forum son las Cookies del navegador tenés que borrar el historial.

Saludos,

Adhemar


Gracias a los que respondieron y por cierto en google chrome, no me deja loguear en el foro, tengo que usar mozilla firefox y ahi si me deja loguear, no se porque pasa ese detalle, que antes no sucedia .

Saludos

Atte: Adrian C. C.
acc69@hotmail.com
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: Evitar puntero XBrowse se mueva al dar enter. (RESUELTO)
Posted: Fri Mar 04, 2016 05:27 PM

Adrian

En Chrome tenes que borrar datos de navegación pulsando Ctrl-H

Saludos,

Adhemar

Saludos,



Adhemar C.
Posts: 632
Joined: Tue Dec 12, 2006 07:34 PM
Re: Evitar puntero XBrowse se mueva al dar enter. (RESUELTO)
Posted: Fri Mar 04, 2016 05:37 PM
acuellar wrote:Adrian

En Chrome tenes que borrar datos de navegación pulsando Ctrl-H

Saludos,

Adhemar



Gracias Ing. Acuellar por el dato.

Saludos y buen dia.

Atte: Adrian

Continue the discussion