Selaa lähdekoodia

Improve border width defaults.

Martijn Laan 1 kuukausi sitten
vanhempi
commit
9cf698d8e5
1 muutettua tiedostoa jossa 2 lisäystä ja 2 poistoa
  1. 2 2
      Components/BitmapButton.pas

+ 2 - 2
Components/BitmapButton.pas

@@ -83,8 +83,8 @@ constructor TBitmapButton.Create(AOwner: TComponent);
 begin
   inherited;
   ControlStyle := ControlStyle + [csReplicatable];
-  FFocusBorderWidth := 2;
-  FFocusBorderHeight := 2;
+  FFocusBorderWidth := 1;
+  FFocusBorderHeight := 1;
   FImpl.Init(Self, 2*FFocusBorderWidth, 2*FFocusBorderHeight);
   TabStop := True;
   Height := 105;