[[Caral]]

Hola
No se, no se, no se.
Si, no se, por eso digo, alguien me dice si este codigo tiene sentido?

Código Delphi [-]
if Adotable1.Locate('fecha',lbl_fecha.Caption,[]) = false then
begin
    AdoTable1.Filtered := False;
    AdoTable1.Filtered := False;
    Filtro := 'fecha = '+lbl_fecha.Caption;
    AdoTable1.Filter := Filtro;
    AdoTable1.Filtered := True;
    AdoTable1.Open;
end
else
begin
    AdoTable1.Filtered := False;
    AdoTable1.Filtered := False;
    Filtro := 'fecha = '+lbl_fecha.Caption;
    AdoTable1.Filter := Filtro;
    AdoTable1.Filtered := True;
    AdoTable1.Open;
end;

Saludos