Comparar fechas en Access

[janexa]

Código Delphi [-]
datamodule1.QC.Close;
datamodule1.QC.SQL.Clear;
datamodule1.QC.SQL.Add('select a.*,c.nombre as Nombre_Articulo, a2.compra_lts ');
datamodule1.QC.SQL.Add('from doctos_compras a, partidas_compras a2, articulos c ');
datamodule1.QC.SQL.Add('where a.folio_compra=a2.folio_compra and ');
datamodule1.QC.SQL.Add('a2.cve_art=c.idarticulo and and a.fecha>=:Xfecha ');
datamodule1.QC.SQL.Add(' and (a.fecha);
datamodule1.QC.SQL.Add('order by fecha ');
datamodule1.QC.ParamByName('Xfecha').AsDatetime:=Picker1.Datetime;
datamodule1.QC.ExecSQL;