Procedure TWPCustomRtfEdit.SetActiveStyleName(X:string)Unit: WPCTRMemoClass: WPCTRMemo.TWPCustomRtfEditParameters X:string