04-05-2019, 12:05 AM
Hi Alexandre,
In my case:
<code>
procedure TIWServerController.IWServerControllerBaseNewSession(
ASession: TIWApplication);
begin
if GSessions.IsValidSession(ASession) then
begin
ASession.Data := TIWUserSession.Create(nil, ASession);
UserSession.Initialize; // most likely it will occur here due to invalid connectionname, sql access denied, etc...
end;
end;
</code>
In your Demo SubclassingExceptionRenderer :
<code>
procedure TIWServerController.IWServerControllerBaseNewSession(
ASession: TIWApplication);
begin
ASession.Data := TIWUserSession.Create(nil);
raise Exception.Create('test Error Message'); // no message appears and the browser is blank
end;
</code>
Thank you,
Craig
In my case:
<code>
procedure TIWServerController.IWServerControllerBaseNewSession(
ASession: TIWApplication);
begin
if GSessions.IsValidSession(ASession) then
begin
ASession.Data := TIWUserSession.Create(nil, ASession);
UserSession.Initialize; // most likely it will occur here due to invalid connectionname, sql access denied, etc...
end;
end;
</code>
In your Demo SubclassingExceptionRenderer :
<code>
procedure TIWServerController.IWServerControllerBaseNewSession(
ASession: TIWApplication);
begin
ASession.Data := TIWUserSession.Create(nil);
raise Exception.Create('test Error Message'); // no message appears and the browser is blank
end;
</code>
Thank you,
Craig