Source position: comctrls.pp line 2488
protected procedure TCustomCoolBar.MouseMove(
Shift: TShiftState;
X: Integer;
Y: Integer
); override;