Ver Mensaje Individual
  #4  
Antiguo 03-02-2010
Avatar de JefeNet
JefeNet JefeNet is offline
Miembro
 
Registrado: ago 2004
Posts: 111
Reputación: 20
JefeNet Va por buen camino
solucionado no se si sera la mejor manera pero me funciona filtro desde el primer dia del mes hasta la fecha actual, asi que si es 28,29, 30 o 31 el ultimo dia del mes no importa.
dejo el codigo por si alguien lo necesita
Código Delphi [-]
var
  fecha1,fecha2:string;
  mes,dia, ano:word;
begin
  decodedate(date,ano,mes,dia);
  Fecha1:=datetostr(date-dia+1); //consigo el primer dia del mes
  Fecha2:= datetostr(date);        //fecha actual
  Tabla.Filtered:=true;
  Ttabla.Filter:='Fecha >= ' + QuotedStr(Fecha1) + ' and Fecha <= ' + QuotedStr(Fecha2);

de esta manera filtro todos los registros donde la fecha este entre el primer dia del mes en curso y el dia actual.
Responder Con Cita