Foros Club Delphi - Error (list index out of bounds) en Zeos DBO 6.0.12

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- MySQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=21)

- - Error (list index out of bounds) en Zeos DBO 6.0.12 (https://www.clubdelphi.com/foros/showthread.php?t=5884)

Error (list index out of bounds) en Zeos DBO 6.0.12

Saludos amigos.

bueno, estoy usando zeos dbo 6.0.12 para conectarme a mysql y postgres, pero al poner un zquery en un dbgrid, y quiero adicionar un registro (CON LAS FECHAD DE CURSOR), y no actualizo, me sale ese error (list index out of bounds), les gradeceria que me puedan ayudar

gracias:o

Luego de revisar cuidadosamente el comportamiento que mencionas concluyo que es un bug. Aún cuando no he encontrado referencia alguna en la página del proyecto Zeos, es, desde mi punto de vista un error.

Este error se produce en el método InternalCancel de la clase TZAbstractDataset en la unidad ZAbstractDataset.pas:

Código:

  if (CachedResultSet <> nil) and GetActiveBuffer(RowBuffer)

    and (CurrentRow > 0) then

  begin

    RowNo := Integer(CurrentRows[CurrentRow - 1]);

    CachedResultSet.MoveAbsolute(RowNo);

    RowAccessor.RowBuffer := RowBuffer;

    FetchFromResultSet(CachedResultSet, Fields, RowAccessor);

  end;

Supongo que el error se debe a que al no haberse introducido datos, CurrentRows no contiene el nuevo registro. Aparentemente si añades la condición

and (CurrentRow < CurrentRows.Count)

al condicional, se arregla. Pruébalo y nos cuentas.

// Saludos

Corrección:

El problema ya está arreglado. Bájate los parches de http://www.zeoslib.net/modules.php?n...download&cid=5

// Saludos