(...) 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