with adoquery1 do
begin
Close;
SQL.Clear;
SQL.Add('Select * From Productos');
SQL.Add('Where Fecha_Vencimiento Between :Fecha1 And :Fecha2');
Parameters.ParamByName('Fecha1').Value:= FormatDateTime('yyyy/mm/dd',Datetimepicker1.Date);
Parameters.ParamByName('Fecha2').Value:= FormatDateTime('yyyy/mm/dd',Datetimepicker2.Date);
Open;
end;