Solution:
In adsdata.pas
function BuildFilterString(poFields: {$IFDEF ADSDELPHIXE3_OR_NEWER} TList<TField> {$ELSE} TList {$ENDIF}; bExactCompare, bCaseInsensitive : Boolean): string;
function TAdsDataSet.BuildFilterString(poFields: {$IFDEF ADSDELPHIXE3_OR_NEWER} TList<TField> {$ELSE} TList {$ENDIF}; bExactCompare, bCaseInsensitive: Boolean): string;
...
strFilter:= BuildFilterString({$IFDEF ADSDELPHIXE3_OR_NEWER} poFields {$ELSE} List(poFields) {$ENDIF}, False { Not exact compare }, loCaseInsensitive in Options);
Without guarantee!