Problema con el Reporte

[loquillo3]

Buenas,

Tengo un ligero problema con un reporte, lo que pasa es que lo quiero hacer buscando entre dos fecha he intentado con varios codigos pero ninguno me han funcionado. Acontinuacion les dejare los codigos que he utilizado.

En este utilizo un AdoQuery y 2 DatetimePicker. Este no tira los datos.

Código Delphi [-]
Qusuarios.Close;
Qusuarios.SQL.clear;
Qusuarios.SQL.Add('SELECT * FROM tabla1 WHERE fecha between '+ (DateToStr(DTP1.Date)) + ' AND '  + (DateToStr(DTP2.Date)));
 Qusuarios.Open;
 QRVentasPorFecha.Preview;

En este otro utilizo 2 MaskEdit.

Código Delphi [-]
 
Qusuarios.Close;
Qusuarios.SQL.clear;
Qusuarios.SQL.Add('SELECT * FROM tabla1 WHERE fecha between '+ (DateToStr(StrToDate(MaskEdit1.Text))) + ' AND '  + (DateToStr(StrToDate(MaskEdit2.Text))));
if (MaskEdit1.Text = '') or (MaskEdit2.Text = '')  then
  begin
   Application.MessageBox('Complete los campos ','Aviso ',MB_OK + MB_ICONerror);
  end
else
 begin
   Qusuarios.Open;
   QuickReport.Preview;
    end;

Y he tratado con otros mas pero no lo he conseguido. Desearia una ayudita en este problema.

Saludos