[droguerman]

sin parametros podria ser algo asi:

Código Delphi [-]
  with dataset do
  begin
     filtered := false;
     filter := 'cod_unidad LIKE '+quotedStr(edit1.text+'%');
     filtered := true;
  end;