Procedure TWPCustomRtfLabel.MouseMove(Shift:TShiftState; X:Integer; Y:Integer)Unit: WPCTRLabelClass: WPCTRLabel.TWPCustomRtfLabelParameters Shift:TShiftState X:Integer Y:Integer