Issue #213: Assign system or custom font once, to the application, and let all forms inherit that font, so there is no need to call InheritFont() for each form.

This commit is contained in:
Ansgar Becker
2018-10-25 19:24:45 +02:00
parent 0d7e459979
commit 9cdcd63145
49 changed files with 34 additions and 189 deletions

View File

@ -53,7 +53,6 @@ uses main;
procedure TDataSortingForm.FormCreate(Sender: TObject);
begin
InheritFont(Font);
TranslateComponent(Self);
ColumnNames := TStringList.Create;
end;