Foros Club Delphi - Ver Mensaje Individual

[eduarcol] · #3 22-03-2008

no se como se manejan los filtros en acces, pero necesitaras algo asi:

suponiendo que nMes sea el numero del mes a filtrar, y nAyo el año:

Código Delphi [-]var
   FechaIni, FechaFin: TDate;
begin
   FechaIni := EncodeDate(nAyo, nMes, 1);
   FechaIni := EncodeDate(nAyo, nMes, DaysinaMonth(nMes));
   Tabla.Filtered := False;
   Tabla.Filter := '(Fecha >= ' + QuotedStr(DatetoStr(FechaIni)) + ') and (Fecha <= ' + QuotedStr(DatetoStr(FechaIni)) + ')';
   Tabla.Filtered := True;
end;

Pero te repito no se si el formato de la fecha te dara error en el filtro, por eso es preferible el SQL y los parametros.