Error con cualquier xBrowse (Maestro Antonio y Daniel))

Board index FiveWin para Harbour/xHarbour Error con cualquier xBrowse (Maestro Antonio y Daniel))

Posts: 133

Joined: Mon May 12, 2008 04:13 PM

Error con cualquier xBrowse (Maestro Antonio y Daniel))
Posted: Tue Apr 13, 2010 04:48 AM

Maestro Antonio Linares y Maestro Daniel Garcia un Saludo

Revisando el xBrowse cuando se edita una columna y se presiona dos o tres veces la tecla derecha da un error o cuando se preciona la tecla backspace dos o tres veces da un error primero pensaba que era un error en parte de mi programacion para estar seguro ejecute el testxbr3.prg y seleccione del menu la opcion dialog rdd all cols sale un xbrowse me voy por ejemplo a una columna que se puede editar como lo es salary y al presiona dos o tres veces la tecla derecha se sale el error es Len (::buffer) ya que que el tipo es "U" y no caracter como debe ser, si arreglo por decir algo con Len( If(ValType(::buffer)$"C",::buffer,Space(1)) ) se soluciona pero dependiendo pasa a otras lineas mas abajos las cuales utilizan de nuevo Len (::buffer) y da el mismo error.

El error se presenta en la clase TGet
De antemano gracias.

Fivewin 16.11
Harbour 3.2.0
Visual Studio 2015 community
MariaDb/MySql

Ing. MSc. Luis Duque
http://www.accasoft.net

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Error con cualquier xBrowse (Maestro Antonio y Daniel))
Posted: Tue Apr 13, 2010 04:47 PM

This is bug in version 10.3.
Please make the following correction to xbrowse.prg:
Lines 9840 to 9851.

Code (fw): Select all Collapse

      case nKey != VK_LEFT .and. ::oEditGet:oGet:TypeOut .and. !Set( _SET_CONFIRM )
           // nKey != VK_LEFT is important. Otherwise continuous pressing of left key exits
           // and errors out
           lExit    := .t.
           ::oEditGet:nLastKey := VK_RETURN
           ::oEditGet:End()
           ::PostEdit()
           if ::oBrw:lFastEdit
              PostMessage( ::oBrw:hWnd, WM_KEYDOWN, nKey )
           endif

           return nil

Please comment out (or remove) the entire block of code above. This is a feature under development not fully tested.

Regards

G. N. Rao.

Hyderabad, India

luisduque

Posts: 133

Joined: Mon May 12, 2008 04:13 PM

Re: Error con cualquier xBrowse (Maestro Antonio y Daniel))
Posted: Tue Apr 13, 2010 05:47 PM

Muchas gracias. elimine las linea y trabaja perfecto

Fivewin 16.11
Harbour 3.2.0
Visual Studio 2015 community
MariaDb/MySql

Ing. MSc. Luis Duque
http://www.accasoft.net

FiveTech Support Forums

Continue the discussion