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