How do I set different Timeout for different Users?

[jeroen.rottink]

I use

Code:

SessionController.SessionOptions.RestartExpiredSession := True;

combined with 

Code:

procedure TIWServerController.IWServerControllerBaseSessionRestarted(aSession: TIWApplication);
begin
  // mark session as restarted
  TIWUserSession(ASession.Data).Clipboard.Put('SessionRestarted');
  ASession.RunParams.Clear;
end;

In the form that is shown after a new session is started you can check this clipboard value to show the user a notification.

Code:

procedure TDlgAppForm.OnFormRender;
begin
  if UserSession.Clipboard.Get('SessionRestarted')
  then ShowAlert(atInfo, _('Sessie was verlopen. Nieuwe sessie gestart.'));
end;