Applies to
TWPRichText

Declaration
TWPCustomRtfEditClick = Procedure(Sender: TWPCustomRtfEdit; PageNo, X, Y: Integer; var Ignore: Boolean) of object;