Jump to content

List of connected clients


adragan

Recommended Posts

Is it possible to get a list of connected clients ( IP/SessionId )

and eventually "kill" one of the sessions ?

 

 

try

 

http://forums.unigui.com/index.php?/topic/1290-sessions/page__p__8766__hl__session__fromsearch__1#entry8766

 

 

or

 

procedure TMainForm.UniBitBtn1Click(Sender: TObject);
var
 I : Integer;
 ASessionList: TList;
 ASession : TUniGUISession;
begin
 memo1.Clear;
 ASessionList:=UniServerModule.SessionManager.Sessions.SessionList.LockList;
 try
       for I := 0 to ASessionList.Count-1 do
       begin
       ASession := TUniGUISession(ASessionList[i]);
       if not ASession.IsTerminated then
         memo1.Lines.Add( ASession.UniApplication.RemoteAddress );
       end;
 finally
       UniServerModule.SessionManager.Sessions.SessionList.UnlockList;
 end;
end;

Link to comment
Share on other sites

  • 8 years later...

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
×
×
  • Create New...