Procedure TWPCustomRichText.DoUpdate(WPUPD_Code:Integer; Param:Integer)Unit: WPCTRRichClass: WPCTRRich.TWPCustomRichTextParameters WPUPD_Code:Integer Param:Integer