anchor.diff:      Exit;
     end;
     R := ClientRect;
  -  LNewWidth := Width;
  -  LNewHeight := Height;
  -  if (LNewWidth = 0) or (LNewHeight = 0) then
  +//  LNewWidth := Width;
  +//  LNewHeight := Height;
  +  if (FImgWidth = 0) or (FImgHeight = 0) then
       Exit;
   {$IFDEF UseGDIPlus}
     GP := TGPGraphics.Create(Canvas.Handle);
   {$ENDIF}
     case FState of
       bsNormal :
  -       PngBrushCopy(R, TRect.Create(Point(0, 0), LNewWidth, LNewHeight));
  +       PngBrushCopy(R, TRect.Create(Point(0, 0), FImgWidth, FImgHeight));
       bsHover :
         begin
           if FImageCount < 2 then
  -          PngBrushCopy(R, TRect.Create(Point(0, 0), LNewWidth, LNewHeight))
  +          PngBrushCopy(R, TRect.Create(Point(0, 0), FImgWidth, FImgHeight))
           else
  -          PngBrushCopy(R, Rect(LNewWidth, 0, LNewWidth * 2, LNewHeight))
  +          PngBrushCopy(R, Rect(FImgWidth, 0, FImgWidth * 2, FImgHeight))
         end;
       bsDown :
         begin
           if FImageCount < 3 then
  -          PngBrushCopy(R, TRect.Create(Point(0, 0), LNewWidth, LNewHeight))
  +          PngBrushCopy(R, TRect.Create(Point(0, 0), FImgWidth, FImgHeight))
           else
  -          PngBrushCopy(R, Rect(LNewWidth * 2, 0, LNewWidth * 3, LNewHeight));
  +          PngBrushCopy(R, Rect(FImgWidth * 2, 0, FImgWidth * 3, FImgHeight));
         end;
       bsDisabled :
         begin
           if FImageCount = 4 then
  -          PngBrushCopy(R, Rect(LNewWidth * 3, 0, LNewWidth * 4, LNewHeight))
  +          PngBrushCopy(R, Rect(FImgWidth * 3, 0, FImgWidth * 4, FImgHeight))
           else  if FImageCount > 0 then
  -          PngBrushCopy(R, TRect.Create(Point(0, 0), LNewWidth, LNewHeight))
  +          PngBrushCopy(R, TRect.Create(Point(0, 0), FImgWidth, FImgHeight))
         end;
     end;
   {$IFDEF UseGDIPlus}
  
positive.code:     if FImageCount > 4 then
        FImageCount := 4;
      ResetSize;
      Invalidate;
    end;
  end;
  
negative.code: {$ENDIF}
    Winapi.Messages,
    System.Classes,
    System.Sysutils,
    System.Types,
    Vcl.Controls,
    Vcl.Graphics,
  