Procedure TWPAbstractCharAttrInterface.SetUnderlineColorNr(ColorNr:Integer)Unit: WPRTEDefsClass: WPRTEDefs.TWPAbstractCharAttrInterfaceParameters ColorNr:Integer