anchor.diff:  implementation
   
   uses
  -  SysUtils, Dialogs;
  +  SysUtils, Dialogs, Math;
   
   { TmGridColumnsSettings }
   
  
positive.code:     {$IFDEF DEBUG_COL_SET}DebugLn('[ApplySettingsToField] ' + aSettings.FieldName + ' ' +aColumn.Title.Caption);{$ENDIF}
    end;
    if aSettings.Width.NotNull then
      aColumn.Width:= aSettings.Width.Value;
    if aSettings.SortOrder.NotNull then
      aColumn.Index := aSettings.SortOrder.Value;
  end;
  
negative.code:   aSettings.DisplayFormat.Value:= aColumn.DisplayFormat;
    aSettings.DisplayLabel.Value:= aColumn.Title.Caption;
    aSettings.SortOrder.Value:= aColumn.Index;
    aSettings.Width.Value:= max(MINIMUM_GRID_COLUMN_WIDTH, aColumn.Width);
  end;
  
  procedure ApplySettingsToField(aColumn: TColumn; aSettings : TmGridColumnSettings);
  