如何在Delphi XE2上实现uPnP [英] How to Implement uPnP on Delphi XE2

问题描述

我在Delphi XE2上使用了indy TidHTTPServer实现了一个Http服务器。该产品主要用于内部网络，但有时需要从互联网访问。目标客户是小公司，对于这种PnP功能是必须的。

对于内部使用，此服务器使用来自服务器的当前IP，并尝试分配端口8888

我想在网络上发现一个可以让我要求端口路由的wandevice。我不确定端口路由是最好的解决方案，我不熟悉的可能性。然而，我更喜欢最广泛的可用性，因为我相信并不是所有路由器都有完整的选项。

对于这些情况，我正在考虑常见的路由器，如linksys，tplink等，与DSL安装一起使用，在小公司使用。

如果有一个组件或源代码的链接已经实现了这个更好。

解决方案

UPnP Delphi组件似乎可用

• a href =http://www.whitebear.ch/upnp.htm =nofollow> http://www.whitebear.ch/upnp.htm （源，免费软件/捐赠软件）

可以在这里获得UPnP基础知识和源代码示例的描述

• http://francois-piette.blogspot.de/2013/02/using-universal-plug-and-play-upnp-with.html

使用Indy的设备发现相关问题：

• 我可以使用IdUDPClient发送M-SEARCH请求吗？

I have a Http server implemented using indy TidHTTPServer on Delphi XE2. This product is mostly used for intranet, however sometimes it is needed to be accessed from internet also. The target customers are small companies, and for this PnP capabilities is a must.

For internal use this server uses the current IP from the server and try to assign the port 8888.

I want to discover a wandevice on the network that can let me ask for port routing. I am not sure port routing is the best solution either, I am not familiar with the possibilities. However I prefer the most widely available possibilities, since I believe not all routers have full options.

For these case I am considering common routers, like linksys, tplink, etc, that comes with DSL installations, widelly used on small companies.

If there is a link for a component or source code that already implement this even better.

解决方案

UPnP Delphi components seem to be available

• http://www.whitebear.ch/upnp.htm (with source, freeware / donationware)

A description of UPnP basics and links to source examples are available here

• http://francois-piette.blogspot.de/2013/02/using-universal-plug-and-play-upnp-with.html

Related question about device discovery using Indy:

• Can I use IdUDPClient to send M-SEARCH request?

这篇关于如何在Delphi XE2上实现uPnP的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！