запрос на выручку

[-Apostol-]

Приветствую вас! Очень нужна помощь На форме находится компоненты DBGrid1,ADOTable1, ADOConnection1, DataSource1, ADOQuery1 также 2 компонента DateTimePicker.
Необходимо организовать подсчет выручки за определённое время. Пользователь должен с помощью компонентов DateTimePicker вводит дату начальную и конечную при нажатии кнопки должны остаться только те записи которые входят в диапазон между 2 датами.Я зашел в тупик

[SERG1980]

 with ADOQuery1 do
  begin
   Close;
   SQL.Clear;
   Parameters.Clear;
   Parameters.AddParameter.Name:='Date1';
   Parameters.AddParameter.Name:='Date2';
   Parameters.ParamByName('Date1').DataType:=ftDateTime;
   Parameters.ParamByName('Date2').DataType:=ftDateTime;
   Parameters.ParamByName('Date1').Value:=DateTimePicker1.Date;
   Parameters.ParamByName('Date2').Value:=DateTimePicker2.Date;
   SQL.Add('SELECT * FROM Таблица WHERE DateField BETWEEN :Date1 AND :Date2 ORDER BY DateField ASC');
   Open;
  end;

где DateField поле с датами по которому идёт отбор

[-Apostol-]

Если не сложно посмотри пожалуйста и укажи недочеты по возможности если не затруднит исправьте

[-Apostol-]

Как описать дата 1 дата 2 или их вообще не нужно описывать?????

[SERG1980]

Не могу откомпилировать ваш проект так как нет TRvdataSetConnection
А так я вам же всё порлностью описал поместите этот код для ккакой нибудь кнопки подставьте имя вашей таблицы и поля по которому идёт запрос
PS имя таблицы не путайте с именем DBGrid

[-Apostol-]

А если у меня база в Acces сделана и привязана???

[-Apostol-]

Просто мне нужно привязать к программе бд сделанную в Accees я это сделал а теперь мучаюсь куда не зайду спросить совет по выручке от продаж или ещё что то постоянно проблемы

[-Apostol-]

Изменил в базе имя таблицы написал англ буквами везде все поменял пишет "отсутствует значение одного или нескольких требуемых параметров"

[SERG1980]

Сообщение от -Apostol-

Изменил в базе имя таблицы написал англ буквами везде все поменял пишет "отсутствует значение одного или нескольких требуемых параметров"

Ну как я понял этот кусок кода отвечал у вас за запрос

procedure TForm4.Button1Click(Sender: TObject);
begin
  // выполнить   
{try
          ADOQuery1.Active:=false;
          ADOQuery1.Parameters('first_date').AsDate:=DateTimePicker1.Date;
          ADOQuery1.Param('last_date').AsDate:=DateTimePicker2.Date;
          ADOQuery1.Active:=true;
     except
        on error: EDatabaseError do begin
           MessageDlg('При выполнении запроса произошла ошибка:'+#13+#13+
           error.Message ,mtError,[mbOK],0);
        end;
end;}
end;

А теперь посмотрите в пост где я вам описывал создание запроса. Где сам SQL запрос, где создание параметров (если конечно вы их не создали в дизайн тайм).
Перед тем как активировать квери надо написать sql запрос хоть какой нибудь
PS советую почитать вам книгу Флёнова "библия программиста", скачать можно на данном сайте в разделе книги