Procedure TWPCharAttrInterface.SetFont(ca:TWPCharAttr; FontNr:Integer)Unit: WPRTEDefsClass: WPRTEDefs.TWPCharAttrInterfaceParameters ca:TWPCharAttr FontNr:Integer