Property TCharacterAttr.CodeTextFont : stringUnit: WPRTEDefsClass: WPRTEDefs.TCharacterAttrDescription Optional: Fontname, i.e. Wingdings (also set CodeTextCharset!)