用这个~~呵呵~~刚才那个错了~  with query2 do
  begin
    close;
    sql.clear;
    Sql.Add('Select * From jiang Where AddInTime=DateValue('+DateToStr(dtp1.date)+')');
    open;
  end;  AddInTime=DateValue('+DateToStr(dtp1.date)+')')就是相当于查询条件:AddIntime等于你的那个datetimepicker选择的日期呀!!Query的SQL语句是String的~~
所以转化为String~~DateToStr(dtp1.date)