Código Delphi [-] ADOQuery1.Open; ADOQuery1.Filter := 'Month(FECHA)= '+Edit1.Text; ADOQuery1.Filtered := True;
ADOQuery1.Open; ADOQuery1.Filter := 'Month(FECHA)= '+Edit1.Text; ADOQuery1.Filtered := True;