anchor.diff:  
   procedure DoControlUnlock(Ctl: TWinControl);
   begin
  -  Ctl.EnableAutoSizing;
  +  //Ctl.EnableAutoSizing;
   
     {$ifdef windows}
     Ctl.Perform(WM_SetRedraw, 1, 0);
  
positive.code:           //size
            UpdW(Pages1, Trunc(w * NSplit));
            //pos
            FSplit1.Left:= w;
            Pages2.Left:= w;
          end;
        gm2h:
          begin
  
negative.code:           UpdH(Pages1, h div 3);
            UpdH(Pages2, h div 3);
            //pos
            Pages2.Top:= h;
            Pages3.Top:= h;
            FSplit1.Top:= Pages2.Top;
            FSplit2.Top:= Pages3.Top;
          end;
        gm4v:
          begin
  