Source position: extctrls.pp line 1176
protected procedure TCustomControlBar.DoBandMove(
aControl: TControl;
var aRect: TRect
); virtual;