anchor.diff:    cTabsMouseMinDistanceToDrag: integer = 10; //mouse must move >=N pixels to start drag-drop
     cTabsMouseMaxDistanceToClick: integer = 4; //if mouse moves during mouse-down >=N pixels, dont click
   
  +  function _ShortenStringEx(C: TCanvas;
  +    const Text: string;
  +    Mode: TATTabTruncateCaption;
  +    Width: integer;
  +    const DotsString: string = #$2026): string;
   
   implementation
   
  
positive.code:     atpBottom,
      atpLeft,
      atpRight
      );
  
  type
  
negative.code:   FOptWhichActivateOnClose:= aocRight;
    FOptFillWidth:= _InitOptFillWidth;
    FOptFillWidthLastToo:= _InitOptFillWidthLastToo;
    FOptTruncateCaption:= _InitOptTruncateCaption;
    FOptTabHeight:= _InitOptTabHeight;
    FOptTabWidthMinimal:= _InitOptTabWidthMinimal;
    FOptTabWidthMaximal:= _InitOptTabWidthMaximal;
  