Hola.
Ahora entiendo..., podrías hacer:
Código Delphi
[-]
...
var
DS: TDataSet;
begin
if Edit1.Text > '' then
begin
DS := DataSource1.DataSet;
DS.Filtered := False;
DS.Filter := 'NOMBRE LIKE ' + QuotedStr(Edit1.Text + '%');
DS.Filtered := True;
end;
end;
Saludos