Delphi XE2 / Intraweb12 - 在运行时更改端口/全局变量

Question

我已经用IW11编写了一些独立的应用程序，它运行良好，但也许有一些更好的方法来解决像全局变量这样的问题。在Delphi XE2上更新到IW12后，我的应用程序不再运行了，我不知道如何解决它：

在SCFORM.PAS中，我为独立服务器应用创建了一个新表单。在此，我放置了一些数据库控件来检查客户oracle数据库的连接并读取一些参数。

对于会话监控，我使用一个数组（会话数据也存储在数据库中）。使用

从数据库读取参数信息后，端口已更改

GServerControler.Port := portnum;

但是在运行应用程序后，我无法使用http:\\127.0.0.1:(portnum)连接到它;我猜端口改变不起作用？

所以，我的问题是：

• 如何在运行时更改端口
• 如何在运行时更改池大小
• 是使用SCFORM.PAS中的全局变量更正（用于会话监控）还是应该使用其他方式？

目前，同时有500名在线用户中约有50名，但未来可能更多。

Answer 1

例如，如果将端口号保存到ini文件，则可以使用for (i = 0; i < $('#list li').length; i++) { $('#list li').eq(i).clone().attr('rel', i).appendTo($('#newList')); } 上的计时器加载该值。只是在ServerController中加载它似乎无法正常工作。我将我的计时器设置为默认值1000，并在运行代码后将其禁用。

我使用OnCreate表单并在其上有一个编辑框，用户可以使用该编辑框来更改端口号。我在CustomStandalone中加载了端口值，并将其分配给OnCreate。