🚀 go-pugleaf

"McKool" <kenethw@peak-system.com> wrote in message news:40d83978@newsgroups.borland.com...

> I want to give (if it is possible) to the user the possibility to stop the
> server, change the port and start it again.  I made it with MyServer->Active
> = false but the Server do not take the new port number.
 
> Is there a way to do that?

I think your problem occurs because Bindings have already been created for listener thread(s) when Active was set to True.  Setting the DefaultPort property does not change anything already allocated in Bindings.

Options:

* For multiple Bindings, set the port number directly in each of the existing Bindings.
  
  TIdTCPServer->Bindings[i]->Port = myIntPort;

* To use a single default Binding, just clear the existing Bindings and set DefaultPort.

 TIdTCPServer->Bindings->Clear();
 TIdTCPServer->DefaultPort = myIntPort;

Either of these options has to be done when Active is False.


> Where can I post a message to learn how to make a program in
> C++ Builder that work like a services in Windows NT ? 

I don't have C++ Builder installed at the moment, but the Delphi VCL reference has docs for TServiceApplication and TService.  C++Builder should also.  

Not sure which NG would be best...

hth...