Ayuda con Access Violation

[JerS]

Buenas, amigos me aparece la excepción "Access Violation at address 004022E6 in module proyecto.exe" . pero lo curioso es que no es siempre que sucede

Código Delphi [-]
                    ZQuery2.Close;
                    ZQuery2.SQL.Clear;
                    ZQuery2.SQL.Add('Select antes from DetallePersonal Inner Join TipoPersonal on cedula='+quotedstr(cedula)+'and cod_tipo=codigo and antes<>"00:00:00"');
                    ZQuery2.Open;
                      IF Not ZQuery2.Eof Then
                        cadenaantes:=ZQuery2.FieldbyName('Antes').AsString
                      Else
                        cadenaantes:='00:00';

esperando su ayuda gracias, esto me tiene loco