mirror of
https://git.vladimir.cc/vladimir/ewsdr.git
synced 2026-08-25 20:37:33 +00:00
ui: use system font in flat controls
This commit is contained in:
@@ -529,7 +529,6 @@ begin
|
||||
B.ClrBorder := FButtonTheme.BtnBorderNorm;
|
||||
B.ClrText := FButtonTheme.BtnText;
|
||||
B.ClrTextAct := FButtonTheme.BtnTextActive;
|
||||
B.Font.Name := 'Courier New';
|
||||
B.Font.Size := 8;
|
||||
B.Invalidate;
|
||||
end;
|
||||
|
||||
@@ -204,7 +204,6 @@ begin
|
||||
Result.ClrBorder := ClrBorder;
|
||||
Result.ClrText := ClrText;
|
||||
Result.ClrTextAct := ClrTextAct;
|
||||
Result.Font.Name := 'Courier New';
|
||||
Result.Font.Size := 8;
|
||||
Result.Font.Color := ClrText;
|
||||
end;
|
||||
|
||||
@@ -77,7 +77,6 @@ begin
|
||||
TabStop := True;
|
||||
Cursor := crHandPoint;
|
||||
|
||||
Font.Name := 'Courier New';
|
||||
Font.Size := 9;
|
||||
|
||||
FClrBG := TColor($00181818);
|
||||
|
||||
@@ -272,7 +272,6 @@ begin
|
||||
TabStop := True;
|
||||
Cursor := crDefault;
|
||||
|
||||
Font.Name := 'Courier New';
|
||||
Font.Size := 9;
|
||||
|
||||
FClrBG := TColor($001A1A1A);
|
||||
|
||||
@@ -112,7 +112,6 @@ begin
|
||||
FEditing := False;
|
||||
FDragging := False;
|
||||
|
||||
Font.Name := 'Courier New';
|
||||
Font.Size := 9;
|
||||
|
||||
FClrOuterBG := TColor($00181818);
|
||||
|
||||
@@ -127,7 +127,6 @@ begin
|
||||
TabStop := True;
|
||||
Cursor := crIBeam;
|
||||
|
||||
Font.Name := 'Courier New';
|
||||
Font.Size := 9;
|
||||
|
||||
FMinValue := 0.0;
|
||||
|
||||
@@ -93,7 +93,6 @@ begin
|
||||
TabStop := True;
|
||||
Cursor := crDefault;
|
||||
|
||||
Font.Name := 'Courier New';
|
||||
Font.Size := 8;
|
||||
|
||||
FClrOuterBG := TColor($00181818);
|
||||
|
||||
@@ -78,7 +78,6 @@ begin
|
||||
TabStop := True;
|
||||
Cursor := crHandPoint;
|
||||
|
||||
Font.Name := 'Courier New';
|
||||
Font.Size := 9;
|
||||
|
||||
FClrBG := TColor($00181818);
|
||||
|
||||
@@ -121,7 +121,6 @@ begin
|
||||
TabStop := True;
|
||||
Cursor := crIBeam;
|
||||
|
||||
Font.Name := 'Courier New';
|
||||
Font.Size := 9;
|
||||
|
||||
FMinValue := 0;
|
||||
|
||||
Reference in New Issue
Block a user