[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