
(...)
screen_drawinfo := GetScreenDrawInfo(pub_screen)
(...)
pub_scr_font_name:=screen_drawinfo.font.mn.ln.name
(...)
StrCopy(font_name, pub_scr_font_name)
(...)
ptrScreenFontTA:=[
font_name,
screen_drawinfo.font.ysize,
screen_drawinfo.font.style,
screen_drawinfo.font.flags]:textattr
(...)@vojo, post #1
@docent, post #2
@Hexmage960, post #5