做了些删除

Client/LXTalk.inc

@@ -1 +1 @@
-{.$DEFINE OldGroup}
+{$DEFINE OldGroup}

Client/MainFrm.pas

@@ -14773,29 +14773,6 @@ begin
       RealICQContacterTreeView.AddEmployee(Employee);
 
       UpdateEmployeeNode(Employee, RealICQUser, False);
-//      ParentNode := Employee.Node.Parent;
-//      while ParentNode <> nil do
-//      begin
-//        TmpBranch := ParentNode.Data;
-//        TmpBranch.EmployeeCount := TmpBranch.EmployeeCount - 1;
-//        if (Employee.LoginState <> stOffline) and (Employee.LoginState <> stHidden) then
-//          TmpBranch.OnlineEmployee := TmpBranch.OnlineEmployee - 1;
-//        ParentNode := ParentNode.Parent;
-//      end;
-
-//      if Assigned(Employee.Node.Parent) then
-//      begin
-//        UpdateEmployeeNode(Employee, RealICQUser, False);
-//        if (not Assigned(Employee.Node.Parent.Parent)) and (Employee.LoginState <> stOffline) and (Employee.LoginState <> stHidden) then
-//        begin
-//          TmpBranch := Employee.Node.Parent.data;
-//          TmpBranch.OnlineEmployee := TmpBranch.OnlineEmployee - 1;
-//          TmpBranch.EmployeeCount := TmpBranch.EmployeeCount - 1;
-//          TmpBranch.Update;
-//        end;
-//      end
-//      else
-//        FreeAndNil(Employee);
     end;
     {$endregion}