Source position: bcgradientbutton.pas line 45
protected procedure TBCGradientButton.MouseMove(
Shift: TShiftState;
X: Integer;
Y: Integer
); override;