Procedure TWPCustomRichText.SetIToolCtrl(x:IWPCustomToolCtrlInterface)Unit: WPCTRRichClass: WPCTRRich.TWPCustomRichTextParameters x:IWPCustomToolCtrlInterface