   ______________273

 ScreenPos       
      .

,       (. 4.14)   
 ,       , ,
 13.         -
:

TRect TempRect;

TPoint P;

 = Panel3->ClientToScreen(Point(0, 0)) ;

TempRect.Left = P.x;

TempRect.Top = P.y;

P = Panel3->ClientToScreen(Point(Panel3->UndockWidth,
Panel3->UndockHeight)) ;

TempRect.Right = P.x;

TempRect.Bottom = P.y;

Panel3->ManualFloat(TempRect) ;

     TempRect,    -
,      
.      13,    
 ,     .   
     .  
      ClientToScreen   -
 .    ManualFloat  -
 .

  ,     ManualDock, 
   .  :

bool _fastcall ManualDock(TWinControl* NewDockSite,

TControl* DropControl, TAlign ControlSide);

 NewDockSite  ,    
.   DropControl     
NewDockSite,     .  ,  -
   NULL.  ControlSide  
  .      ,  -
   .      ,  , -
, ControlSide = alLeft   ,    
    .

      ,   :

Panel4->ManualDock(Panel I,NULL,alLeft) ;

    Pnalel4  Panell,    
 ,      - .

        -
 ManualFloat  ManualDock. , ,    , -
  ,     ,  
        .     
 DockSite = true,      DragKind 
dkDock  DragMode  dmAutomatic,     OnCreate  
   ManualFloat  ManualDock,    Ma-
nualDock .   ,     -
  .      - , -
     .   
   .