From 7d10edbadba56124e9459e616849aebf4316403c Mon Sep 17 00:00:00 2001
From: ondrej <ondrej@lazarus-ide.org>
Date: Mon, 4 Jun 2018 15:07:49 +0000
Subject: [PATCH] LCL: speedbutton: fix glyph painting for NumGlyphs > 1. Issue
 #33820, patch by C Western

git-svn-id: trunk@58124 -
---
 lcl/include/speedbutton.inc | 2 --
 1 file changed, 2 deletions(-)

diff --git a/lcl/include/speedbutton.inc b/lcl/include/speedbutton.inc
index adcb790dca..49cc8481d9 100644
--- a/lcl/include/speedbutton.inc
+++ b/lcl/include/speedbutton.inc
@@ -595,8 +595,6 @@ begin
   // compute size of glyph
   GlyphSize := GetGlyphSize(Draw,PaintRect);
   GlyphWidth := GlyphSize.CX;
-  if TButtonGlyph(FGlyph).NumGlyphs > 1 then
-    GlyphWidth:=GlyphWidth div NumGlyphs;
   GlyphHeight := GlyphSize.CY;
   HasGlyph:=(GlyphWidth<>0) and (GlyphHeight<>0);
   //debugln(['TCustomSpeedButton.MeasureDraw Step2 ',DbgSName(Self),' PaintRect=',dbgs(PaintRect),' GlyphSize=',GlyphWidth,'x',GlyphHeight]);