At first this should for the visual part (Designer eg.)

And should for windows this not added ? Because in windows the fonts should reside in %windir%\Fonts (see MS documentation)

  function GetWinDirFonts: string;
  var
    dir: array [0..MAX_PATH] of Char;
  begin
    GetWindowsDirectory(dir, MAX_PATH);
    Result :=  StrPas(dir)+DirectorySeparator+'Fonts';
  end;

and

  {$ifdef mswindows}
  SearchPath.Add(GetWinDir);
  SearchPath.Add(GetWinDirFonts);
  {$endif}

in fpttf.pp around line 560

Andreas

Am 21.08.2017 um 11:49 schrieb Graeme Geldenhuys via Lazarus:
On 2017-08-21 10:35, Andreas Frieß via Lazarus wrote:
It is possible to use a standard font and give a warning instead of fire
an exception.

Eg. Font xxxx not found, using standardfont instead .... ?

I don't like that. First, how are you going to display the warning? Remember fpReport was designed to be able to run from console or headless servers too, not just desktop apps. Secondly, how are you going to substitute the font? Which font will you choose, and how will you make that choice? Using equivalent font metrics values, simply by name, some random standard font that might make your report look crap? My personal opinion - I like to see a report the way I designed it or not at all (until I fixed what was missing or broken).

Regards,
  Graeme


--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Reply via email to