Xailer forum

Publicado: **Mié Jun 02, 2021 6:22 pm**

Buenas tardes,

***************************** Registro de errores *****************************

Exe: C:\Xailer\Samples\Modern\Browses\DBBrowse\dbbrowse.exe
Version: 1.0.0.0
User name: SERVIDOR
Computer name: SERVIDOR
Fecha: 06/02/21
Hora: 18:16:18
Memoria libre: 2097151
Area actual: 1

------------------------- Información del compilador --------------------------

Versión Xailer: Xailer 7.0.10
Compilador: Harbour 3.2.0dev (r1912031042)
Compilador C/C++: MinGW GNU C 7.3 (32-bit)
Plataforma: Windows 10 10.0

----------------------- Información detallada del error -----------------------

Subsistema: BASE
Código de error: 1132
Estado: .F.
Descripción: Bound error
Operación: array access
Argumentos: [ 1] = Tipo: A Valor: [ 2] = Tipo: N Valor: 0
Fichero:
Código error SO: 0

Pila de llamadas:
TDBBROWSEMOD:UPDATERECNO (300)
TBRWMODGRID:SETINDEX (3752)
TLISTBOXMOD:CREATE (192)
TBRWMODGRID:CREATE (2962)
TBROWSEMOD:CREATE (408)
TDBBROWSEMOD:CREATE (65)
TFORM1:CREATEFORM (173)
TFORM1:NEW (204)
MAIN (14)

Saludos.
Miguel C.

Publicado: **Jue Jun 03, 2021 10:36 am**

Buenos días,

Muchas gracias por la notificación y disculpe las molestias. El error se ha producido por un pequeño cambio que permite que nIndex pueda valer cero cuando la matriz de datos está vacía.

Le adjunto el código que corrige el problema:

Código: Seleccionar todo

METHOD UpdateRecno( nRecno ) CLASS XDbBrowseMod

   ::Super:UpdateRecno( nRecno )

   IF !Empty( nRecno ) .AND. ::oDataSet != NIL
      WITH OBJECT ::oDataSet
         IF nRecno <= Len( ::oDataGrid:aWork )
            :GoTo( ::oDataGrid:aWork[ nRecno ], .f. )
         ENDIF
         AEval( :aLinkedControls, {|v| v:Refresh( ) } )
      END WITH
   ENDIF

RETURN nil

Si fuera tan amable de probarlo antes de publicar una nueva versión se lo agradezco. Sólo para cerciorarnos de que no haya ningún problema adicional.

Un saludo

Publicado: **Jue Jun 03, 2021 11:10 am**

Buenos días,
Añadido fichero DbBrowseMod.prg con la modificación de código al proyecto y funciona correctamente.
Saludos.
Miguel.

Xailer forum

Error TDBBrowseMod en version de Xailer 7.0.10

Error TDBBrowseMod en version de Xailer 7.0.10

Re: Error TDBBrowseMod en version de Xailer 7.0.10

Re: Error TDBBrowseMod en version de Xailer 7.0.10