On Mon, 21 Aug 2017, Andreas Frieß via Lazarus wrote:
Is is not better to call the standard fonts of the system in
TFPReportDesignerForm.FormCreate(Sender: TObject); ?
if gTTFontCache.SearchPath.Count=0 then
begin
gTTFontCache.SearchPath.Add(ExtractFilePath(ParamStr(0))+'../demos/fonts/');
gTTFontCache.SearchPath.Add(GetUserDir + '.fonts/');
{$IFDEF UNIX}
gTTFontCache.SearchPath.Add('/usr/share/fonts/truetype/ubuntu-font-family/');
gTTFontCache.SearchPath.Add('/usr/share/fonts/truetype/dejavu/');
{$ENDIF}
end;
if (gTTFontCache.Count=0) then
gTTFontCache.BuildFontCache;
if (gTTFontCache.Count=0) then // <-------
gTTFontCache.ReadStandardFonts; // <-------
Because the standardfonts are not read in the designer.
Yes.
A patch for this was already provided by Pascal Riekenberg. It has been applied.
Michael.
--
_______________________________________________
Lazarus mailing list
[email protected]
https://lists.lazarus-ide.org/listinfo/lazarus
