Hola leogobo.
Cuando tenés nombres de campos con caracteres especiales o con espacios tenés que encerrar el nombre del campo entre corchetes:
Código Delphi
[-]
...
begin
Dbf1.Filtered:= False;
Dbf1.Filter:= '[Fecha Recibido]='+QuotedStr(DateToStr(MonthCalendar1.Date));
Dbf1.Filtered:= True;
...
end;
Saludos.