Hola
Y algo asi:
Código Delphi
[-]
begin
Table1.Open;
Table2.Open;
Table1.First;
dx:=Table1.Recordcount;
r:=StrToInt(Edit3.Text);
for dz:=1 to dx do
Begin
Table1.Filter := 'FECHA between '+DateToStr(DateTimePicker1.Date)+' AND '+DateToStr(DateTimePicker2.Date);
Table1.Filtered := True;
end;
begin
Table2.Insert;
Table2.Fieldbyname('FECHA').asDate:=Table1.Fieldbyname('FECHA').asDate;
La tabla 2 tengo entendido que es para recoger el resultado del filtro.
Me equivoco?
Saludos