anchor.diff:    else
       offset := Point(0, 0);
   
  -  CalculatePositions (ix, iy, tx, ty);
  +  CalculatePositions(ix, iy, tx, ty);
   
     if FShowImage and Assigned(FImage) then
     begin
  
positive.code:     lTextFlags := [txtHCenter, txtVCenter{, txtWrap}];
      if not Enabled then
        lTextFlags += [txtDisabled];
      Canvas.DrawText(r, Text, lTextFlags);
    end
    else
      fpgStyle.DrawString(Canvas, tx+offset.x, ty+offset.y, Text, Enabled);
  
negative.code:   begin
      clr := fpgColorToRGB(clButtonFace);
      fpgSetNamedColor(clButtonface, FBackgroundColor);
      fpgStyle.DrawButtonFace(Canvas, r, lBtnFlags);
      fpgSetNamedColor(clButtonface, clr);
    end
    else
      fpgStyle.DrawButtonFace(Canvas, r, lBtnFlags);
  
    if FFocused and (not FEmbedded) then
    begin
      InflateRect(r, -3, -3);
      fpgStyle.DrawFocusRect(Canvas, r);
    end;
  
    Canvas.SetTextColor(FTextColor);
  