anchor.diff:      destructor Destroy; override;
   
       procedure Clear;
  +    procedure Assign(const aSource: TmGridColumnSettings);
   
       property FieldName : String read FFieldName;
       property DisplayLabel : TNullableString read FDisplayLabel;
  
positive.code:   FDisplayFormat.IsNull:= true;
  end;
  
  end.
  
negative.code:     function GetSettingsForField (aFieldName : String) : TmGridColumnSettings;
      function Count : integer;
      function Get (aIndex : integer): TmGridColumnSettings;
  
      procedure Assign(const aSource : TmGridColumnsSettings);
  
      procedure Clear;
    end;
  