[poli-smen]

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

Код:

tblSbor.Close;
Query1.Close;
Query1.DatabaseName:=ExtractFilePath(Application.ExeName);
Query1.SQL.Text:='SELECT * FROM sbor.dbf WHERE dpo BEETWEN ((...) AND (...))';
tblSbor.Open;
Query1.Open;

как запрос надо написать?
Ну и вобще правильно или нет?

Пробуй так:

Код:

  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;