Source position: graphics.pp line 1947
procedure FontNameToPangoFontDescStr(
const LongFontName: ;
out aFamily: ;
out aStyle: ;
out aSize: Integer
);