Filtrado de dos datos en ado

[gdlrinfo]

Hola amigos necesito Filtrar dos datos en ado por ejemplo yo tengo un calendario donde filtro por fecha y anda perfecto lo uso de esta manera


var
Filtro : String;
begin
If (Edit1.Text <> '') then
begin
Consul.Filtered := False;
If 'Nombre' = 'Nombre' then Filtro := 'Fecha Like '''+DateToStr (monthcalendar1.Date)+ '*''' ;
Consul.Filter := Filtro ;
Consul.Filtered:=True; ;
end
else Consul.Filtered := False;
end;

Se preguntaran porque deje el if ese ahi sin necesidad es que este codigo lo uso para muchas otras cosas entonces solo le quite lo que no necesitaba no por otra cosa:
Ahora bien necesito que una ves que este filtrada la fecha pueda tambien filtrar nombres sin que se me salga el filtro de la fecha he probado quitando else Consul.Filtered := False; y haciendo otro filtro con el edit de la misma manera pero al filtrarme los nombres me saca el filtro de la fecha espero su respuesta y muchas gracias como siempre

[Caral]

Hola
Es un filtro.
Si quieres que haga dos cosas a la vez, no lo hará.
Se tiene que hacer un filtro por cada cosa que se necesite.
Saludos