With MD.ADOfut do begin
if active then close;
SQL.Clear;
SQL.Add('Select *');
SQl.Add('From Futs');
SQL.Add('where fecha = :Fecha');
SQL.Add('and IDFut= :IDFut');
Parameters.ParamByname('Fecha').AsDateTime:=DateTimePicker1.DateTime;
Parameters.ParamByName('IDFut').AsString:=Edit1.Text;
Open;
.....
....
end;