mORMot Open Source

DigDiver

Member

Registered: 2013-04-29

Posts: 137

SetUser in TSQLRestClientRedirect problem

Client := TSQLRestClientRedirect.Create(ExistingServer);

Client.SetUser() does not work, because Ctxt.Call^.RestAccessRights is nil in:

procedure TSQLRestServer.SessionCreate(var User: TSQLAuthUser;
  Ctxt: TSQLRestServerURIContext; out Session: TAuthSession);
var i: integer;
begin
  Session := nil;
  if (reOneSessionPerUser in Ctxt.Call^.RestAccessRights^.AllowRemoteExecute) and
     (fSessions<>nil) then

DigDiver

Member

Registered: 2013-04-29

Posts: 137

Re: SetUser in TSQLRestClientRedirect problem

I found that call.RestAccessRights is always NIL when I try to use any method via TSQLRestClientRedirect. Maybe I need to make any adjustment in ExistingServer?