Hola,
prueba con esto:
Código Delphi
[-]select fecha, cod from venta
where fecha = :fec
y en el boton:
clientdataset1.Close;
sqldataset1.ParamByName('fec').AsDate := datetimepicker1.Date;
clientdataset1.Open;
Los parámetros deben mandarse con el signo ':' delante del nombre del parámetro.
Otra cosa, para evitar posibles lios que se haga el SQL, procura no poner el mismo nombre al parámetro que a un campo existente.
Saludos