FIX: Read fonts settings from xml-config (fixes #2052)

This commit is contained in:
Alexander Koblov 2025-01-07 16:01:01 +03:00
commit cad083f6e8

6
components/doublecmd/dcxmlconfig.pas Normal file → Executable file
View file

@ -119,7 +119,7 @@ type
// ------------------------------------------------------------------------
procedure GetFont(const aNode: TXmlNode; Path: TXmlPath;
out Name: String; out Size: Integer; out Style, Quality: Integer;
var Name: String; var Size: Integer; var Style, Quality: Integer;
const DefName: String; const DefSize: Integer; const DefStyle, DefQuality: Integer);
procedure SetFont(const aNode: TXmlNode; Path: TXmlPath;
@ -788,8 +788,8 @@ begin
end;
end;
procedure TXmlConfig.GetFont(const aNode: TXmlNode; Path: TXmlPath; out
Name: String; out Size: Integer; out Style, Quality: Integer;
procedure TXmlConfig.GetFont(const aNode: TXmlNode; Path: TXmlPath; var
Name: String; var Size: Integer; var Style, Quality: Integer;
const DefName: String; const DefSize: Integer; const DefStyle,
DefQuality: Integer);
begin