Zugriffsverletzung beim Zugriff auf eine UserSession in Intranet

Question

Ich bin neu bei IntraWeb und habe ein Problem. Um ein Login-Formular zu implementieren, habe ich Datensätze in der Benutzersession gespeichert. Aber wenn es darum geht, auf die Datasets zuzugreifen, erhalte ich einen Zugriffsverletzungsfehler. Ich habe herausgefunden, dass die Useressession nicht erstellt wurde. Jetzt bin ich etwas verwirrt, denn im Intraweb-Dokumentarfilm heißt es, dass die Usersession automatisch vom ServerController erstellt wird.

I-Zugang (will jeweils) der Datensatz wie diese UserSession.Dataset.open;

Ich benutze den IntraWeb Test in Rad Studio XE5 enthalten. Kann das das Problem sein? Falls dies nicht das Problem ist, wie kann ich manuell eine Userssession erstellen?

Vielen Dank

[Edit 13.4.16]

Das Problem der Evaluation Version war ich verwendet. Nach der Installation der Vollversion ist mein Problem verschwunden. Sie haben ihre Usersession.create-Prozedur geändert, indem Sie einen weiteren Parameter hinzugefügt haben. So stellen Sie sicher, dass Sie die aktuelle Version verwenden, wenn u das gleiche Problem haben: Danke für alle Antworten

Answer 1

Sie müssen die ‚Daten‘ innerhalb Sitzung

procedure TIWServerController.IWServerControllerBaseNewSession(
    ASession: TIWApplication; var VMainForm: TIWAppForm); 
begin 
    ASession.Data := TUserSession.Create; 
end; 

bewusst schaffen sein, dass in diesem Beispiel

TUserSession

ist eine definierte Benutzerklasse

type 
    TUserSession = class 
    public 
    UserCount: Integer; 
    end; 

werfen Sie einen Blick auf dieses Tutorial, das erklärt, wie die Sitzungen Management in IW getan wird - http://etutorials.org/Programming/mastering+delphi+7/Part+IV+Delphi+the+Internet+and+a+.NET+Preview/Chapter+21+Web+Programming+with+IntraWeb/Building+IntraWeb+Applications/

oder konsultieren Sie die technical documentation von Atozed zur Verfügung gestellt.

Answer 2

Ich habe versucht, nur einen Kommentar hinzuzufügen, anscheinend brauche ich mehr Punkte dafür. Die Antwort wird gefunden, wenn Sie in die Antwort von RBA gehen, aber hier ist die Kurzform:

IW erstellt und verwaltet die Benutzersitzung automatisch. Die TIWUserSession ist jedoch nur Ihr Teil davon. Um Ihre eigenen Daten in der Sitzung zu haben, erstellen Sie die TIWUserSession und fügen Sie sie als .Data der Sitzung hinzu. In IWServerControllerBaseNewSession tun dies mit:

ASession.Data := TIWUserSession.Create(nil, ASession); 

Beachten Sie, dass die session Parameter des Verfahrens die Sitzung von IW verwaltet wird.

Um Ihre TIWUserSession zuzugreifen, ein Verfahren, in ServerController zu erstellen:

function UserSession: TIWUserSession; 
begin 
    Result := TIWUserSession(WebApplication.Data); 
end; 

dieses Verfahren im Abschnitt Schnittstelle Expose.

Dan

Answer 3

Es fiel mir ein, daß wir „das falsche Problem zu lösen“ sein.

Sie haben angegeben, dass dies bei der Implementierung eines Anmeldeformulars aufgetreten ist. Sie haben außerdem angegeben, dass eine in WServerControllerBaseNewSession() festgelegte Unterbrechung nicht aufgetreten ist.

Haben Sie in ServerController "AuthBeforeNewSession" auf True festgelegt? Wenn ja, setze es auf False und sieh nach, ob sich das Verhalten ändert.

Dan