[How do I get all the active sections in Hyper Server?]

On 8/20/2018 at 2:27 PM, Marlon Nardi said:

Farshad,

 

If it were possible , my dream code would be this one.

 

A mega challenge, however, would benefit many projects .

var
  HS: THyperServer;
  S : TUniGUISessions;
  U : TUniGUISession;
  vI, vII: Integer;
  MyClassOrVar: TMyClassOrVar;
begin
  if NodeZero then
  begin
    HS := THyperServer.Create;
    HS.Lock;
    try
      for vI := 0 to HS.Nodes.Count -1 do
      begin
        S := HS.Nodes[vI].SessionManager.Sessions;
        for vII := 0 to S.SessionList.Count - 1 do
        begin
          U := S.SessionList[vII];
          MyClassOrVar.Add(TUniMainModule(U.UniMainModule).MyClassOrVar.Name);
        end;
      end;
    finally
      HS.UnLock;
      HS.Free;
    end;
  end;
end;

Do I understand correctly that there is no way to go through all the sessions and find out their statuses?  active/discarded

[How to find out which hyper server to close?]

Windows - Task Manager - uniGUI HyperServer - right click mouse button - Open file location. If found, right click mouse button - end task this process