Código Delphi [-]procedure TfrmPrincipal.Edit1Change(Sender: TObject); begin ClienDataSet1.Encomiendas_vista2.Filter := 'Nombre Like ' + QuotedStr('%' + Edit1.Text + '%'); ClienDataSet1.Encomiendas_vista2.Filtered := True; end;
procedure TfrmPrincipal.Edit1Change(Sender: TObject); begin ClienDataSet1.Encomiendas_vista2.Filter := 'Nombre Like ' + QuotedStr('%' + Edit1.Text + '%'); ClienDataSet1.Encomiendas_vista2.Filtered := True; end;