[poli-smen]

Сообщение от Andrej-zhe

Не работает, а можно целиком процедуру, а то я в базах данных 0.

У меня так работает:

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Query1.Close;
  Query1.SQL.Text := 'SELECT * FROM sbor.dbf WHERE dpo >= :date1 AND dpo < :date2';
  Query1.ParamByName('date1').AsDate := Int(DateTimePicker1.Date);
  Query1.ParamByName('date2').AsDate := Int(DateTimePicker2.Date)+1;
  Query1.Open;
end;

Сообщение от Andrej-zhe

Да и еще вот что я не указал а может это важно. У меня файл sbor.dbf формируется из 4-х других файлов может проблема в этом.

Не вижу в этом проблемы.