Source position: comctrls.pp line 577
protected procedure TPageControl.DockOver(
Source: TDragDockObject;
X: Integer;
Y: Integer;
State: TDragState;
var Accept: Boolean
); override;