Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Базы данных и репортинг > Филитрация по дате

Автор: VanHelsing 18.4.2010, 20:23

Необходимо сделать фильтрацию по временному промежутку.

Код


procedure TFReadInfo.Table1FilterRecord(DataSet: TDataSet; var Accept: Boolean);
begin
  Accept := DataSet.FieldByName('Data').AsDateTime > dtp1.Date;
end;

Так я делаю фильтрацию по одному параметру, подскажите пожалуйста как сделать фильтрацию по диапазону.

Автор: Deniz 19.4.2010, 05:37

Код

procedure TFReadInfo.Table1FilterRecord(DataSet: TDataSet; var Accept: Boolean);
var d : TDate;
begin
  d:=DataSet.FieldByName('Data').AsDateTime
  Accept := (d > dtp1.Date) and (d < dtp2.Date);
end;

Автор: VanHelsing 19.4.2010, 18:11

Большое спасибо.

Автор: Akella 20.4.2010, 12:30

Во какие у людей проблемы бывают, про and/or и т.д. совсем не ведают smile