Как получить порт TFPHttpServer ?

[hinst]

Есть такая фича: если .Port указать 0 то система назначит любой открытый порт.... После старта сервера хочу узнать, на каком порте он слушает. Можно посмотреть порт в Process Hacker на вкладке Network. Как узнать порт программно?

Код: Выделить всё

begin
  Server := TFPHttpServer.Create(nil);
  Server.Port := 0;
  Server.ClientPort := ClientPort;
  Server.Active := True; // порт?????
  Server.Free;
end;