Código Delphi [-]Form1.table1.filter := '(Fecha >= '+QuotedStr(DateTimeToStr(DateTimePicker1.Date))+') And (Fecha <= '+QuotedStr(DateTimeToStr(DateTimePicker2.Date))+')';
Form1.table1.filter := '(Fecha >= '+QuotedStr(DateTimeToStr(DateTimePicker1.Date))+') And (Fecha <= '+QuotedStr(DateTimeToStr(DateTimePicker2.Date))+')';