with Query1 do begin
If Active then Close;
SQL.Clear;
SQL.Add('Select FECHA');
SQL.Add('From Emp_YEE ');
SQL.Add('Where Fecha >=' +DateToStr(DateTimePicker1.DateTime)+' AND Fecha <=' +DateToStr(DateTimePicker2.DateTime));
SQL.Add('Order by FECHA');
Open;
end;
QuickRep1.Preview;
end;