Applies to
TWPRichTextLabel

Declaration
THyperLinkEvent = Procedure(Sender: TObject; text: string; url: string; IgnoredNumber: Longint ) of object;