原来的方法:
启动:
defaultport := 82;
active:=true;
关闭:
active := false;
关闭后端口被占用,无法释放。
解决方法:
启动:
httpServer.Active := False;
httpServer.reusesocket := true;
HTTPServer.Bindings.Clear;
Binding := HTTPServer.Bindings.Add;
Binding.Port := 82;
Binding.IP := getLocalIp;
httpServer.Active := true;