Procedure TWPCustomRtfEdit.DoAfterInitializeRTFDataObject(Sender:TObject)Unit: WPCTRMemoClass: WPCTRMemo.TWPCustomRtfEditParameters Sender:TObject