Async Session problem

Remoting SDK
1

Hello.

My system consists of .Net Server and IpSuperTcpServerChannel, Delphi Client and TROSuperTCPChannel.

system works with session management.

consists two service LoginService and DataService. DataService is ‘RequireSession = True’.

The problem (implement Async) occurred during the upgrade Remobjects 7.0.65.1067 to 8.2.89.1153.

Create a DataModule in Delphi client, then created the service as follows:

// ClientDataModule

LoginService: = CoLoginService.Create(Message, ClientChannel);
DataService: = CoDataService.Create(Message, ClientChannel);

LoginService.Login();

After login, the Async were called with the same Message and Channel.

Test_Async: = CoDataService_Async.Create(ClientDataModule.Message, ClientDataModule.ClientChannel);
Test_Async.Invoke_GetSqlData(Self.Name, SqlString, ParamArray);

In previous versions, this working good.

But it LoginNeeded the Async events occurred after the upgrade.

Async does not seem to use of the existing Session at runtime.

Best Regards.

2

hmm, I can’t reproduce this problem . I’ve used

//    Message: TROBinMessage;
//    ClientChannel: TROSuperTCPChannel;

procedure TForm23.Button1Click(Sender: TObject);
var
  LoginService: ILoginService;
  DataService: IDataService;
  Test_Async: IDataService_Async;
begin
  LoginService := CoLoginService.Create(Message, ClientChannel);
  DataService := CoDataService.Create(Message, ClientChannel);

  LoginService.Login();

  Test_Async:= CoDataService_Async.Create(Message, ClientChannel);
  Test_Async.Invoke_GetData;
  while not Test_Async.AnswerReceived do Sleep(50);
  Test_Async.Retrieve_GetData;

  ShowMessage('OK');
end;

procedure TForm23.ClientChannelLoginNeeded(Sender: TROTransportChannel;
  anException: Exception; var aRetry: Boolean);
begin
  ShowMessage(anException.Message);
end;

Can you create a simple testcase, that reproduces this issue, pls?
You can attach it here or send directly to support@