anchor.diff:  
       procedure ExtractFromColumn (aColumn : TColumn);
       procedure ApplyToColumn(aColumn : TColumn);
  +
  +    procedure SaveToXmlElement (aElement : TmXmlElement);
  +    procedure LoadFromXmlElement(aElement : TmXmlElement);
   
       property DisplayLabel : String read FDisplayLabel write FDisplayLabel;
       property Visible : Boolean read FVisible write FVisible;
  
positive.code: 
  uses
    Contnrs, Grids, DBGrids,
    mMaps;
  
  type
  
  
negative.code:     FFieldName : String;
      FDisplayLabel : String;
      FVisible : boolean;
      FWidth : integer;
      FSortOrder : integer;
    public
  