把这个文件复制到你的程序目录
DevExpress VCLExpressDataControllerSourcescxLike.pas
function LikeStr(const AStr, APatternStr: string; APercent, AUnderline: Char): Boolean;
var
vPatternStr : string;
begin
vPatternStr := Format('%%%s%%', [APatternStr]);
Result := Like(PChar(AStr), Length(AStr), PChar(vPatternStr),
Length(vPatternStr), APercent, AUnderline, #0);
end;
===========
补充,在ExpressDataControllerSources中,重新编译ExpressDataControllerPackagescxDataD11.dproj后ok。