How do I get all the active sections in Hyper Server?
How do I get all the active sections in Hyper Server?
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
beg