hola Agregar el first a ver si te sirve
Código Delphi
[-]cdsClientDataSet.Filtered := False;
cdsClientDataSet.Filter := '';
sFiltroCampo := '(' + oField.FieldName + ' LIKE ' + QuotedSTR('%'+TFrameFiltroString(Components[i]).txtCadena.text+'%') + ')';
cdsClientDataSet.Filter := sFiltroCampo;
cdsClientDataSet.Filtered := True;
cdsClientDataSet.FIRST ;