Indy TIdHTTPServer.OnCommandGet - к какому порту был подключен? - PullRequest
3 голосов
/ 10 января 2020

У меня есть TIdHTTPServer, который доступен на нескольких портах (из-за миграции), и мне нужно выяснить, откуда поступают текущие данные (в OnCommandGet). Где я могу получить правильный номер порта?

1 Ответ

5 голосов
/ 11 января 2020

Это в AContext.Binding.Port.

Протестировано с помощью следующего в обработчике CommandGet для IdHTTPServer в Delphi 10.3.3:

AResponseInfo.ContentText := '<!DOCTYPE html><html lang="en"> +
  '<head><title>A Test Response</title></head>' +
  '<body>Target port: ' + IntToStr(AContext.Binding.Port) +
  '</body></html>';
...