TdbGrig con busqueda avanzada

[ecfisa]

Hola

Un ejemplo simplificado de como hacer lo que buscas:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  with IBQuery1 do
  begin
    Close;
    SQL.Text := 'SELECT * FROM TU_TABLA';
  end;

  with DataSetProvider1 do
  begin
    DataSet := IBQuery1;
    Options := Options + [poAllowCommandText];
  end;

  with ClientDataSet1 do
  begin
    Close;
    ProviderName := 'DataSetProvider1';
    Open;
  end;
end;

procedure TForm1.Edit1Change(Sender: TObject);
begin
  with ClientDataSet1 do
  begin
    Close;
    CommandText:= 'SELECT * FROM TU_TABLA WHERE TU_CAMPO LIKE :PARAM';
    ClientDataSet1.Params.ParamByName('PARAM').AsString := '%' + Edit1.Text + '%';
    Open;
    Refresh;
  end;
end;

Donde, "TU_TABLA" es el nombre que le diste a la tabla en tu bd y "TU_CAMPO" es el campo sobre el que harás la búsqueda.

Saludos