Novato (Parametros de busqueda)

[[enecumene]]

tengo un boton que al presionar sale una ventana de busqueda, aqui os dejo el codigo:

Código Delphi [-]
procedure TForm3.BitBtn1Click(Sender: TObject);
begin
  // Muestra el diálogo de consultas
  dlgBuscar.ShowModal;
  if dlgBuscar.ModalResult = mrOK then begin
      qryConsulta.Close;
      qryConsulta.ParamByName('Casa_Comercial').AsString :=
          dlgBuscar.BuscarEdt.Text+'%';
      qryConsulta.Open;
      if qryConsulta.EOF then
         ShowMessage('No se encontró!');
  end;
end;

yo quiero saber como puedo ampliar los parametros, o sea, que no busque solamente por casa_comercial, sino tambien orden_compra, carta_orden y asi sucesivamente, pero me gustaria que me presentara todos las coincidencias en una grilla aunque en un campo este repetido.

gracias!!!!