fix: switching off the server was not stopping the IPv6 part

This commit is contained in:
Massimo Melina 2020-05-24 17:57:08 +02:00
parent dd0fc4e448
commit 0f720b8a25

View File

@ -690,8 +690,9 @@ end; // start
procedure ThttpSrv.stop();
begin
if assigned(sock) then
if sock = NIL then exit;
try sock.Close() except end;
try sock.multiListenSockets.clear() except end;
end;
procedure ThttpSrv.connected(Sender: TObject; Error: Word);