Muchas Gracias, lo probé y me dio un error, pero al investigar ya quedó, les comparto
el código para que les sirva a los demás
Código Delphi
[-] DM.fdqCuentasPorCobrar.Active := Not DM.fdqCuentasPorCobrar.Active;
DM.fdqCuentasPorCobrar.SQL.Clear;
DM.fdqCuentasPorCobrar.SQL.Add('SELECT * FROM CuentasPorCobrar WHERE TIMESTAMPDIFF (DAY, FechaVencimiento, CURRENT_DATE) > DiasTolerancia ORDER BY idGpo');
DM.fdqCuentasPorCobrar.Open;