anchor.diff:    FDateEdit.Parent := Self;
     FDateEdit.Align:= alBottom;
     FLabel := Self.CreateStandardLabel;
  +  CreateStandardOperatorMenu(FLabel);
   end;
   
   procedure TmDateFilterConditionPanel.SetFilterCaption(aValue: String);
  
positive.code:   FEdit.Text := '';
    FEdit.OnEditingDone:= Self.OnEditValueChanged;
    FLabel := Self.CreateStandardLabel;
    FForceUppercase:= false;
    CreateStandardOperatorMenu(FLabel);
  end;
  
  
negative.code: 
  uses
    Controls, Classes, StdCtrls, StrUtils, Contnrs, Variants,
    ExtCtrls, EditBtn, Menus, Spin,
    mFilter, mBaseClassesAsObjects, mMathUtility;
  
  type
    { TmFilterConditionPanel }
  