anchor.diff:    if FFilterOperator=AValue then Exit;
     FFilterOperator:=AValue;
     UpdateCurrentOperatorCheck;
  +  Self.SetFilterCaption(FCaption);
   end;
   
   
  
positive.code:   protected
      FFlex : integer;
      FFieldName : String;
      FFilterOperator : TmFilterOperator;
      FOperatorsMenu : TPopupMenu;
      FAllowedOperators : TmFilterOperatorsSet;
  
negative.code:   FFilterButton.OnClick:= Self.InternalOnClickFilter;
  end;
  
  
  procedure TmExecuteFilterPanel.ExportToFilter (aFilter : TmFilter);
  begin
  