anchor.diff:  
   { TmFilterConditionPanel }
   
  +procedure TmFilterConditionPanel.SetFlex(AValue: integer);
  +begin
  +  if FFlex=AValue then Exit;
  +  FFlex:=AValue;
  +  Self.Width := FFlex * DEFAULT_FLEX_WIDTH;
  +end;
  +
   function TmFilterConditionPanel.CreateStandardLabel: TLabel;
   begin
     Result := TLabel.Create(Self);
  
positive.code: 
  type
  
    { TmFilterConditionPanel }
  
    TmFilterConditionPanel = class (TCustomPanel)
    protected
      function CreateStandardLabel : TLabel;
      function FormatFilterCaption (aValue : String) : String;
    public
  
negative.code:   inherited Create(TheOwner);
    Self.BevelInner:= bvNone;
    Self.BevelOuter:= bvNone;
    Self.FFlex := 2;
    Self.Width := Self.FFlex * DEFAULT_FLEX_WIDTH;
    Self.Caption := '';
    Self.Height := 40;
  end;
  