anchor.diff:    //imagelist
     if Assigned(FImages) then
       if (AImageIndex>=0) and (AImageIndex<FImages.Count) then
  +    begin
  +      NIndentTop:=
  +        (RectText.Top + RectText.Bottom - FImages.Height + FOptColoredBandSize) div 2;
         case FOptIconPosition of
           aipIconLefterThanText:
             begin
               FImages.Draw(C,
                 RectText.Left - 2,
  -              (RectText.Top + RectText.Bottom - FImages.Height) div 2,
  +              NIndentTop,
                 AImageIndex);
               Inc(RectText.Left, FImages.Width+FOptSpaceBetweenIconCaption);
             end;
  
positive.code:           begin
              FImages.Draw(C,
                (RectText.Left + RectText.Right - FImages.Width) div 2,
                (RectText.Top + RectText.Bottom - FImages.Height) div 2,
                AImageIndex);
            end;
          aipIconAboveTextCentered:
  
negative.code:           Inc(FTabWidth, FImages.Width);
  
        if FOptShowXButtons<>atbxShowNone then
          if not Data.TabHideXButton then
            Inc(FTabWidth, FOptSpaceXSize);
  
        if FTabWidth<FOptTabWidthMinimal then
          FTabWidth:= FOptTabWidthMinimal;
  