TCP サーバーを介して並行してメッセージを取得し、別の Web サーバー アプリケーションから Web サービスを呼び出すアプリケーションを開発しました。
並列リクエストが Web サービス サーバーによってシリアルに処理されることに注意しました。
状況を改善するために、Webサーバーの応答を遅らせるように強制しました。
追跡したところ、低レベルの Delphi webservice 呼び出しシリアライズ呼び出しによって webservice 呼び出しが並列に行われていることがわかりました。
スニッフィングしたところ、接続が 1 つしか開かれておらず、応答を取得した後に HTTP 要求が 1 つずつ送信されていることがわかりました。
私のベースWebサービスコールは次のとおりです
var
HTTPRIO: THTTPRIO;
WS: TelephoneDispachServerSoap;
begin
try
HTTPRIO := THTTPRIO.Create(nil);
WS := GetTelephoneDispachServerSoap(false, '',HTTPRIO);
CoInitialize(nil);
r := WS.MaxMethod(10,20);
finally
CoUninitialize;
end;
end;
Web サービス呼び出しを並行して送信するにはどうすればよいですか?
ありがとう