anchor.diff:        Letters[uniCode].u2 := (pX + chWidth - INS) / fTexSizeX;
         Letters[uniCode].v2 := (pY + chHeight - INS) / fTexSizeY;
   
  -      Inc(pX, chWidth + fTexPadding*2);
  +      Inc(pX, chWidth + fTexPadding);
       end;
   end;
   
  
positive.code:   for I := 0 to fCharCount - 1 do
    if Used[I] <> 0 then
    begin
      if dstX + Letters[I].Width + fTexPadding * 2 >= fTexSizeX then
      begin
        dstX := fTexPadding;
        Inc(dstY, lineHeight + fTexPadding * 2);
        if dstY + lineHeight + fTexPadding * 2 >= fTexSizeY then
        begin
          //Append new atlas
          Assert((AtlasCount < 255), 'We hit a limit of 256 atlases');
          Inc(fAtlasCount);
          dstX := fTexPadding;
          dstY := fTexPadding;
          SetLength(fAtlases, fAtlasCount);
          SetLength(fAtlases[fAtlasCount - 1].TexData, fTexSizeX * fTexSizeY);
        end;
  
negative.code: 
        if chWidth = 0 then Continue;
  
        if pX + chWidth + fTexPadding >= fTexSizeX then
        begin
          pX := 0;
          Inc(pY, txtHeight + fTexPadding);
          if pY + txtHeight + fTexPadding > fTexSizeY then
          begin
            //Append new atlas
            Assert((AtlasCount < 255), 'We hit a limit of 256 atlases');
            Inc(fAtlasCount);
            pX := 0;
            pY := 0;
            SetLength(fAtlases, fAtlasCount);
            SetLength(fAtlases[fAtlasCount - 1].TexData, fTexSizeX * fTexSizeY);
          end;
  