Source position: comctrls.pp line 2467
protected procedure TCustomCoolBar.MouseDown(
Button: TMouseButton;
Shift: TShiftState;
X: Integer;
Y: Integer
); override;