아래와 같이 해보세여..

procedure TForm1.Button1Click(Sender: TObject);
begin
  Table1.Filter:= 'BIRTH_DATE = '+FormatDateTime('yy-mm-dd', Now);
  // 'yy-mm-dd'는 현재 자신의 시스탬의 날자표시 형식에 맞추세요
  Table1.Filtered:= True;
end;


위 소스는 DBDEMOS의 CLIENTS.DBF를 기준으로 만들어졌습니다..
(물론 현재 날자로 하면 아무런 데이타도 안보이겠지만)
하나씩 개별 검색을 하시는 거라면 Table1.FindKey를 이용하세요
그리고 검색한 결과를 위해서는 Table보다는 Query 콤포넌트를 추천합니다..