[Casimiro Noteví]

Para empezar borra esa línea:

Código Delphi [-]
DM.QueryCuentasPorCobrar.Open;