Source position: extctrls.pp line 1484
protected procedure TCustomControlBar.ShiftBands(
AFrom: Integer;
ATo: Integer;
AShift: Integer;
ALimit: Integer
);