Hola pablol23, puedes utilizar like para hacer tu búsqueda aproximada y lo colocas en el evento OnChange de tu Edit.
Código Delphi
[-]
procedure TForm1.Edit1Change(Sender: TObject);
begin
Query.Close;
Query.Sql.Clear;
Query.Sql.Add('SELECT campo1, campo2 FROM tabla ');
Query.Sql.Add('WHERE campo1 LIKE '+QuotedStr(edit1.Text+'% '));
Query.Open;
end;
Saluditos