anchor.diff:    I := 0;
     while I < TheCount do
     begin
  -    SB := TSectionBase(Items[I]);
  +    SB := Items[I];
       Tmp := SB.DrawLogic(Canvas, X, Y + H, XRef, YRef, Width, AHeight, BlHt, IMgr, Sw, Curs);
       H := H + Tmp;
       if Owner.HideOverflow then
  
positive.code:           LeftP := 0;
        end;
  
        PosAbsolute:
        begin
          if TopP = Auto then
            TopP := 0;
          if (LeftP = Auto) then
            if (MargArray[RightPos] <> Auto) and (AutoCount = 0)
            then
              LeftP := AWidth - MargArray[RightPos] - MargArray[Width] - MargArray[MarginRight]
                - MargArray[MarginLeft] - MargArray[PaddingLeft] - MargArray[PaddingRight]
                - MargArray[BorderLeftWidth] - MargArray[BorderRightWidth]
            else
              LeftP := 0;
          X := LeftP;
  
negative.code:   ScrollWidth, YClear: integer;
    LIndex, RIndex: integer;
    SaveID: TObject;
    TotalWidth, LeftWidths, RightWidths, MiscWidths: integer;
    AutoCount: integer;
    BlockHeight: integer;
    IB, Xin: Integer;
  