Source position: graphics.pp line 60
type TFontStylesbase = set of (
fsBold,
fsItalic,
fsStrikeOut,
fsUnderline
);