DbUtilsEh.pas 做以下修改
procedure TDatasetFeaturesEh . FillSTFilterListDataValues(AGrid: TCustomDBGridEh; Column: TColumnEh; Items: TStrings);
begin
end ;
改成:
procedure TDatasetFeaturesEh . FillSTFilterListDataValues(AGrid: TCustomDBGridEh; Column: TColumnEh; Items: TStrings);
begin
if Assigned(AGrid . Center) then
AGrid . Center . StandardFillSTFilterListDataValues(AGrid, Column, Items);
end ;
转载请注明原文地址: https://ibbs.8miu.com/read-2212211.html