AuthorizationManager AutoLogout ?

[Babis Michael]

Hello,

Can you add a AutoLogout on AuthorizationManager ?

Currently i use the following:

procedure TCommonServer.TransportDisconnected(Sender: TObject;
Info: IkbmMWCustomTransportInfo);
var
indyinfo: IkbmMWTCPIPIndyMessagingServerTransportInfo;
vLogin: TkbmMWAuthorizationLogin;
begin
vgThreadLock.BeginWrite;

if (not GetGlobalFlag(gfShuttingDown)) and
(Length(TkbmMWTCPIPIndyMessagingServerTransportInfo(Info).NodeID) > 0) then
begin
vLogin := AuthorizationManager.Logins.Get(TkbmMWTCPIPIndyMessagingServerTransportInfo(Info).NodeID, ‘USER’,
TkbmMWTCPIPIndyMessagingServerTransportInfo(Info).IP + ‘:’ + TkbmMWTCPIPIndyMessagingServerTransportInfo(Info).Port.ToString);

if Assigned(vLogin) then
begin
AuthorizationManager.Logout(vLogin.Token);
AuthorizationManager.DeleteActor(TkbmMWTCPIPIndyMessagingServerTransportInfo(Info).NodeID);
end;
end;

vgThreadLock.EndWrite;
end;

Thank you

• This topic was modified 5 years, 6 months ago by Babis Michael.

[kimbomadsen]

Hi,

You could choose to leave the user logged in, and rely on the automatic inactivity logout.

best regards

Kim/C4D

[Babis Michael]

Hello Kim,

I know about that but i do not want it that way.

Thank you

[Author]

Posts