Applies toTWPRichText
DeclarationTWPOnDelayedUpdate = Procedure(Sender: TObject; var WPUPD_Code: Integer; Param: Integer) of object;