anchor.diff:    FLabel := Self.CreateStandardLabel;
     FGarbage := TObjectList.Create(true);
     FDefaultItemIndex:= -1;
  +  CreateStandardFilterMenu(FLabel, false);
   end;
   
   destructor TmComboFilterConditionPanel.Destroy;
  
positive.code:   aFilter.DataType:= fdtDate;
  end;
  
  function TmDateFilterConditionPanel.IsEmpty: boolean;
  begin
    Result := (trim(FDateEditMin.Text) = '');
  
negative.code:   mFilter, mFilterOperators, mBaseClassesAsObjects, mMathUtility,
    mUtility, mDateEdit, mVirtualFieldDefs, mVirtualDataSetInterfaces;
  
  resourcestring
    SClearFilterCommand = 'Clear';
    SFindFilteredCommand = 'Find';
  
  type
    { TmFilterConditionPanel }
  
  