[Lazarus] Size adjustments in TControl.DoDock

[Hans-Peter Diettrich]

Hans-Peter Diettrich schrieb:
> I don't understand why DoDock ignores the given rectangle, that was 
> shown while the control has been dragged.

Clarification:

TControl.DoDock should *never* change ARect itself (Delphi compatible).

Eventual adjustments can be made in an *overridden* implementation (see 
TCustomForm.DoDock), which calls inherited to do whatever is required - 
but not more.

Then entire block
   if NewDockSite<>nil then begin
   ...
should be removed.

DoDi