anchor.diff:      property ClientWidth write FClientWidth;
     end;
   
  -  TFloatingObjList = class(TFloatingObjBaseList) {a list of TImageObj's and TPanelObj's}
  -  public
  -    constructor CreateCopy(AMasterList: ThtDocument; Parent: TCellBasic; T: TFloatingObjList);
  -    function FindImage(Posn: Integer): TFloatingObj;
  -    procedure Decrement(N: Integer);
  +  TFloatingObjList = class(TFloatingObjBaseList) {a list of TImageObj's, TPanelObj's , and TFrameObj's}
     end;
   
   
  
positive.code:   if MargArray[piHeight] > 0 then
      FHeight := MargArray[piHeight] - BordT - BordB;
    Prop.GetVertAlign(VertAlign);
    BkColor := Prop.GetBackgroundColor;
  end;
  
  
negative.code:     end;
    end;
    Result := False;
  end;
  
  //-- BG ---------------------------------------------------------- 07.08.2013 --
  procedure TFloatingObjBaseList.SetItem(Index: Integer; const Item: TFloatingObjBase);
  begin
    Put(Index, Item);
  end;
  
  initialization
  