anchor.diff:      end else if aFilter.DataType = fdtDate then
       begin
         tmpDouble := VarAsType(FCurrentFilter.Value[start], vardate);
  -      FMinDoubleValue:= round(tmpDouble);
  +      FMinDoubleValue:= trunc(tmpDouble);
         tmpDouble := VarAsType(FCurrentFilter.Value[stop], vardate);
  -      FMaxDoubleValue:= round(tmpDouble);
  +      FMaxDoubleValue:= trunc(tmpDouble);
       end else if aFilter.DataType = fdtTime then
       begin
         tmpDouble := VarAsType(FCurrentFilter.Value[start], vardate);
  
positive.code:   if FCurrentFilter.FilterOperator = foIn then
    begin
      FValuesAsStrings := TStringList.Create;
      FValuesDictionary := TStringHashMap.Create();
      ConvertVariantToStringList(FCurrentFilter.Value, FValuesAsStrings);
      for i := 0 to FValuesAsStrings.Count - 1 do
      begin
  
negative.code: 
  uses
    Contnrs, Classes, Variants, SysUtils,
    mUtility, mFilterOperators, mMaps;
  
  type
    TmFilterDataType = (fdtString, fdtDate, fdtDateTime, fdtTime, fdtInteger, fdtFloat);
  