anchor.diff:    inherited Create(TheOwner);
     Self.BevelInner:= bvNone;
     Self.BevelOuter:= bvNone;
  -  Self.Width := 100;
  +  Self.FFlex := 2;
  +  Self.Width := Self.FFlex * DEFAULT_FLEX_WIDTH;
     Self.Caption := '';
     Self.Height := 40;
   end;
  
positive.code: 
  uses
    SysUtils;
  
  { TmExecuteFilterPanel }
  
  
negative.code: 
  { 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);
  