Delphi - Filtrar campo Fecha por mes BDE

Necesito saber como filtrar en un campo Fecha utilizando BDE por mes es decir ya tengo el mes de marzo 03 , Filtrar la tabla con todos los records que concuerden con el mes de marzo Gracias

Una forma es usando la propiedad Filter de la tabla

Fecha >= '01/03/2003' AND Fecha <= '31/03/2003'

(y obviamente Filetered debe estar en True para que se aplique el filtro).

Otra forma, es con el evento OnFilterRecord en vez de la propiedad Filter:

procedure TForm1.Table1FilterRecord(DataSet: TDataSet;
var Accept: Boolean);
var
Year, Month, Day: Word;
begin
DecodeDate(Table1Fecha.AsDateTime, Year, Month, Day);
Accept := (Month = 3) and (Year = 2003);
end;

O podrías pensar en usar una consulta en vez de una tabla:

SELECT * FROM tabla WHERE EXTRACT(MONTH FROM fecha) = 3 AND EXTRACT(YEAR FROM fecha) = 2003

Obviamente en vez de los números puedes usar parámetros.

Ernesto De Spirito
http://www.latiumsoftware.com/es/index.php

Perfecto