Según pruebas que acabo de realizar en Paradox solo funciona para los campos en que les pasemos como comienzan, no va ni con terminan, ni contienen.
Código:
procedure TForm1.Button1Click(Sender: TObject);
begin
Table1.Filter:='Company ='+QuotedStr(Edit1.text+'*') ;
ShowMessage(table1.Filter);
Table1.Filtered:=True;
end;
Un Saludo.