anchor.diff:        begin
           lTxtFlags += TextFlagsDflt;
           lp := 0;
  -        r2.SetRect(2, 2, 50, 21);
  +        r2.SetRect(2, 2, 50, TabH);
           while h <> nil do
           begin
             if h <> ActivePage then
  
positive.code:         lTxtFlags += [txtVCenter, txtLeft];
          lp := 0;
          TabW := MaxButtonWidth;
          r2.SetRect(2, 2, TabW, 21);
          while h <> nil do
          begin
            if h <> ActivePage then
  
negative.code:         lTxtFlags += [txtVCenter, txtLeft];
          lp := 0;
          TabW := MaxButtonWidth;
          r2.SetRect(Width - 2 - TabW, 2, TabW, TabH);
          while h <> nil do
          begin
            if h <> ActivePage then
  