Delphi dicas

Filtrar entre datas > q a inicial e < q a final

Dm.tbvenda.Filter:='Data_Venda >='+QuotedStr(datetostr(datainicial.date))+' and Data_Venda <='+QuotedStr(datetostr(datafinal.date));

dm.tbvenda.Filtered:=true;