вывести данные с таблицы
procedure TfMain.tRusOnFilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
Accept:=((tListY.Value=Year)and(tListM.Value=Month)and(tListD.Value=Day));
end;
как сделать чтобы такая фильтрация происходила при нажатии на кнопку
Так она происходит же, раз уж событие случается.