anchor.diff:  end;
   
   
  -function GetTabPagesIndex(AIndex: integer): TATPages;
  +function GetPagesOfGroupIndex(AIndex: integer): TATPages;
   begin
     Result:= nil;
     case AIndex of
  
positive.code:   Data: TATTabData;
  begin
    Result:= nil;
    Pages:= GetTabPagesIndex(AIndex);
    if Pages=nil then exit;
    Data:= Pages.Tabs.GetTabData(Pages.Tabs.TabIndex);
    if Assigned(Data) then
  
negative.code:   try
      for iGroup:= 0 to 8 do
      begin
        Pages:= GetPagesOfGroupIndex(iGroup);
        if Pages=nil then Continue;
        for iTab:= 0 to Pages.Tabs.TabCount-1 do
        begin
  