Browse Source

Another fix in bcmaterialdesignbutton.pas

lainz 9 years ago
parent
commit
d95a086794
1 changed files with 0 additions and 6 deletions
  1. 0 6
      bcmaterialdesignbutton.pas

+ 0 - 6
bcmaterialdesignbutton.pas

@@ -336,12 +336,6 @@ begin
     ts := FBGRA.TextSize(Caption);
     Inc(PreferredWidth, ts.cx + 26);
     Inc(PreferredHeight, ts.cy + 10);
-
-    if FTextShadow then
-    begin
-      Inc(PreferredWidth, FTextShadowSize div 2);
-      Inc(PreferredHeight, FTextShadowSize div 2);
-    end;
   end;
 
   if FShadow then