anchor.diff:      end;
   
       for i:= Low(Pages) to High(Pages) do
  -      Pages[i].Visible:= i<=cGroupsCount[FMode];
  +      Pages[i].Visible:= i<cGroupsCount[FMode];
   
       case FMode of
         gm1plus2Vert:
  
positive.code:     );
  
  type
    TATGroupsNums = 1..6;
  
  type
  
    { TATGroups }
  
    TATGroups = class(TPanel)
  
negative.code: 
    Pages1.EnabledEmpty:= false;
    PagesCurrent:= Pages1;
    Pages[0]:= Pages1;
    Pages[1]:= Pages2;
    Pages[2]:= Pages3;
    Pages[3]:= Pages4;
    Pages[4]:= Pages5;
    Pages[5]:= Pages6;
  
    for i:= Low(Pages) to High(Pages) do
      with Pages[i] do
  