Código Delphi
[-]ADOTable.Filtered:= False;
ADOTable.Filter:= 'Month(FCompra)= '+ '03';
ADOTable.Filtered:= True;
ese
no me gusta nada.
Prueba así:
Código Delphi
[-]
ADOTable.Filtered:= False;
ADOTable.Filter:= 'Month(FCompra)=3';
ADOTable.Filtered:= True;
El mes es de tipo numérico y tu le estás pasando un string.