Procedure TWPAbstractCharAttrInterface.SetUnderlineColor(Color:TColor)Unit: WPRTEDefsClass: WPRTEDefs.TWPAbstractCharAttrInterfaceParameters Color:TColor