Que significa esta excepción Invalid pointer operation

[JerS]

Buenas amigos hago una consulta cualquiera no tiene nada de especial

Código Delphi [-]
ZQuery2.Close;
ZQuery2.SQL.Clear;
ZQuery2.SQL.Add('Select corrido,turno24,agenda from DetallePersonal Inner Join TipoPersonal On cod_tipo=codigo and cedula='+quotedstr(cedula));
ZQuery2.Open;
     IF Not ZQuery2.Eof Then
                        Begin
                          corridobeta:=ZQuery2.fieldbyname('corrido').AsInteger;
                          H24:=inttostr(ZQuery2.fieldbyname('turno24').AsInteger);
                          HorarioP:=ZQuery2.fieldbyname('agenda').AsInteger;
                        End
                      Else
                        Begin
                          corridobeta:=0;
                          H24:='0';
                          HorarioP:=0;
                        End;

y no siempre de vez en cuando me sale la excepción Invalid pointer operation

[ContraVeneno]

seguramente el error te lo marca cuando no te trae resultados la consulta.

En lugar de verificar el OEF, debes verificar con IsEmpty o con RecordCount, pero tambien tendrías que hacer un First y luego un Last para que te aparezca la información correcta.

[JerS]

Empezado por ContraVeneno

seguramente el error te lo marca cuando no te trae resultados la consulta.

En lugar de verificar el OEF, debes verificar con IsEmpty o con RecordCount, pero tambien tendrías que hacer un First y luego un Last para que te aparezca la información correcta.

Como quedaria? algo como esto:

Código Delphi [-]
ZQuery2.Close;
ZQuery2.SQL.Clear;
ZQuery2.SQL.Add('Select corrido,turno24,agenda from DetallePersonal Inner Join TipoPersonal On cod_tipo=codigo and cedula='+quotedstr(cedula));
ZQuery2.Open;
     IF Not ZQuery2.ReCount>0 Then
                        Begin
                          corridobeta:=ZQuery2.fieldbyname('corrido').AsInteger;
                          H24:=inttostr(ZQuery2.fieldbyname('turno24').AsInteger);
                          HorarioP:=ZQuery2.fieldbyname('agenda').AsInteger;
                        End
                      Else
                        Begin
                          corridobeta:=0;
                          H24:='0';
                          HorarioP:=0;
                        End;

[JerS]

Continua el mismo Problema!. pero en realidad a que se debe la excepción Invalid Pointer Operation?