Browse Source

increase the digit font height

Lulu 1 year ago
parent
commit
c05ab64bf3
1 changed files with 2 additions and 4 deletions
  1. 2 4
      lazpaint/dialog/uchoosecolorinterface.pas

+ 2 - 4
lazpaint/dialog/uchoosecolorinterface.pas

@@ -307,10 +307,8 @@ begin
         begin
         begin
           if GetLightness(c)/65535 > 0.5 then
           if GetLightness(c)/65535 > 0.5 then
             cDigit := BGRABlack else cDigit := BGRAWhite;
             cDigit := BGRABlack else cDigit := BGRAWhite;
-          Bitmap.FontHeight := Round(Height*2/3);
-          Bitmap.TextOut(CenterPoint.x,
-                         CenterPoint.y-Bitmap.TextSize(s).cy div 2,
-                         s, cDigit, taCenter);
+          Bitmap.FontFullHeight := Height;
+          Bitmap.TextOut(CenterPoint.x, CenterPoint.y-Height div 2, s, cDigit, taCenter);
         end;
         end;
       end;
       end;
     end;
     end;